ALTDEPTH

(GIN Macro)

Defined in: IFMACS

Used in:

ALTDEPTH.mac.txt

 B2=W    [   
 B2QG    [   
 B3=6    [??? ALTDEPTH SECT DEVT FGN 1 DOC   
 B3PQ    [   
 B49B    #MAC           ALTDEPTH 
 B4P2    [              ======== 
 B58L    [   
 B5N=    [   
 B67W    [ %A - +1 OR -1 
 B6MG    [   
 B776    [ ALTERS 'NESTDEPTH' AND SHIFTS STACK IDENTIFIERS 'NESTEITHERS' 
 B7LQ    [ AND 'NESTFLAG' APPROPRIATELY  
 B86B    [   
 B8L2    #ALT           NESTDEPTH=NESTDEPTH%A
 B95L    #STR           +,%A 
 B9K=    (   
 B=4W    #ALT           NESTEITHERS=NESTEITHERS@L-1  
 B=JG    #ALT           NESTFLAG=NESTFLAG@L-1
 B?46    #EXI
 B?HQ    )   
 B#3B    #ALT           NESTEITHERS=NESTEITHERS@L1   
 B#H2    #ALT           NESTFLAG=NESTFLAG@L1 
 B*2L    #NOR