DIM ;SFISC/JFW,GFT,TOAD-FileMan: M Syntax Checker, Main ;28APR2016
Source file <DIM.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GC | ; get next command on line (*)
|
|
B | ||
C | ||
D | ||
E | ||
F | ||
G | ||
H | ||
I | ||
K | ||
L | ||
M | ||
N | ||
O | ||
Q | ||
R | ||
S | ||
U | ||
W | ||
X | ||
Z | ||
SEP | ; remove first " "-piece of %X into %ARG: parse commands (GC)
|
|
COMMAND | ;;BREAK;CLOSE;DO;ELSE;FOR;GOTO;HALT;HANG;IF;KILL;LOCK;MERGE;NEW;OPEN;QUIT;READ;SET;USE;WRITE;XECUTE;
|
|
LAST | ; check to ensure no trailing "," at end of command (GC)
|
|
ER | ||
END |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | GC+7*, GC+8, END! |
%A | END! |
%A1 | END! |
%A2 | END! |
%ARG | GC+3, GC+7, GC+9, GC+10, B, E, F, H, K, N , Q, SEP+5*, END! |
%C | SEP+1*, SEP+3*, SEP+4*, END! |
%C1 | END! |
%COM | GC+3*, GC+4, GC+5, GC+6*, GC+9, GC+10, END! |
%COM(1 | GC+7*, B, E, F, H, I, K, Q |
%END | DIM+7*, GC+10*, LAST+2, END! |
%ERR | DIM+7*, GC+1, GC+3, GC+4, GC+5*, GC+8, GC+9, SEP+2, SEP+3*, END! |
%H | END! |
%I | SEP+1*, SEP+3*, SEP+4*, SEP+5*, END! |
%L | LAST+1*, END! |
%LAST | DIM+7*, GC+3*, LAST+1*, END! |
%OUT | SEP+2~*, SEP+4* |
%P | END! |
%X | DIM+7*, GC+1*, GC+2, GC+3, F, H, K, N, SEP+1, SEP+3 , SEP+4, SEP+5*, LAST+1, END! |
%Z | END! |
X | DIM+7, ER! |
Name | Field # of Occurrence |
---|---|
$T(COMMAND | GC+5 |