TABULATE

(GIN Macro)

Defined in: CLOSE-MACROS

Used in: DEAD867, DIRENT867, ERASE867, FHOBJDIR860, GETDIR860, GETDIRX860, INCCHECK860, LIBLOAD867, RENAMDIR, RENAMEMT867, RETURN867, TRAPGO864, USERLIB867, USEROPEN867

TABULATE.mac.txt

 9^64 ...[??? TABULATE SECT FILE FGN 11 DOC  
 9^*W    #MAC  TABULATE  
 9^TG          REWIND
 =2*6          MHUNT    1,FILE,FTAB  
 =2SQ    #STR  %B
 =3#B    (   
 =3S2          LOADNUM  0,%B*2   
 =4?L          ADS   0  FTREAD(1)
 =4R=    )   
 =5=W          ADX   1  FTREAD(1)
 =5QG          LDX   0  A1+2(1)  
 =6=6          TOPFCA2  2
 =6PQ          STO   0  FREADBLOCK(2)
 =79B          LDX   0  A1+3(1)  
 =7P2          STO   0  FREADWORD(2) 
 =88L          LDX   2  FX2  
 =8N=          LDX   1  FX1  
 =97W    #NOR