void ProcACmd( void )
{
int cmd;
ChkBreak();
CmdStart = ScanPos();
switch( CurrToken ) {
case T_CMD_SEPARATOR:
Scan();
break;
case T_DIV:
Scan();
ProcDo();
break;
case T_LT:
Scan();
ProcInvoke();
break;
case T_GT:
Scan();
ProcLog();
break;
case T_QUESTION:
Scan();
ProcPrint();
break;
case T_MUL:
Scan();
ProcRemark();
break;
case T_EXCLAMATION:
Scan();
ProcSystem();
break;
case T_TILDE:
Scan();
ProcThread();
break;
default:
cmd = ScanCmd( CmdNameTab );
if( cmd < 0 ) {
if( _IsOn( SW_IMPLICIT ) ) {
ProcInvoke();
} else {
ProcNil();
}
} else {
(*CmdJmpTab[ cmd ])();
}
break;
}
ScanSavePtr = 0; /* clean up previous ScanSave locations */
}
void InvokeAFile( char *name )
{
ReScan( name );
ProcInvoke();
}