AND

(GIN Macro)

Defined in: IFMACS

Used in: CONSET864, EDITER867, FORMLOOP865, GETFREE867, GETFREEB864, IDFASAT867, IDFCONF867, IPBLISTA867, IPBLISTD867, LISTAST867, LISTOPEN867, LISTPARS867, LISTRING864, MESSA, MESSAA, MESSAB, MESSAC, MESSAD, MESSAF, MESSAG, MESSAI, MESSBA, MESSBB, MESSBE, MESSBH, MESSBJ, MESSCA, MESSCB, MESSCD, MESSCI, MESSDC, MESSDJ, MESSE, MESSF, MESSI, OPER864, OPERA864, OPERAPP864, OPERIN867, PERCON867, PMACT867, PMCHECK867, SHOWCOMM864, TPOBJ867, TROBJ867, WA864, WHATPROP865, WHATRVS867, WHATRVSA867, WLA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLG862, WLOUT865

AND.mac.txt

 5J==    [   
 5JPW    [   
 5K9G    [??? AND SECT DEVT FGN 1 DOC
 5KP6    [   
 5L8Q    #MAC           AND  
 5LNB    [              ===  
 5M82    [   
 5MML    [ ENSURES:  
 5N7=    [     DEPTH NON-ZERO
 5NLW    [     'THEN' / 'DO' NOT FOUND   
 5P6G    [     'OR' EXPECTED 
 5PL6    [ COMPILES: 
 5Q5Q    [     A JUMP OR BRANCH  
 5QKB    [     LABEL FOR START OF NEXT CONDITION STEP
 5R52    [   
 5RJL    #UNS           NESTDEPTH
 5S4=    (   
 5SHW          FLAGTEST AND,0,NOT,0,NOT,THEN/DO  
 5T3G    #SKI           NESTDEPTH/9  
 5TH6    (   
 5W2Q          GOIFALSE NIF7,NIF6,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%-
 5WGB    P,%Q,%R,%S,%T,%U,%V 
 5X22    #ALT           20?=NESTDEPTH-9  
 5XFL    #STR           EITHER,%A
 5X^=    (   
 5YDW          NESTLABEL NIF6,FREE   
 5YYG    #EXI
 5^D6    )   
 5^XQ          NESTLABEL NIF7,FREE   
 62CB    #EXI
 62X2    )   
 63BL          GOIFALSE NIF2,NIF1,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%-
 63W=    P,%Q,%R,%S,%T,%U,%V 
 64*W    #ALT           20?=NESTDEPTH-1  
 64TG    #STR           EITHER,%A
 65*6    (   
 65SQ          NESTLABEL NIF1,FREE   
 66#B    #EXI
 66S2    )   
 67?L          NESTLABEL NIF2,FREE   
 67R=    #EXI
 68=W    )   
 68QG    !! MEANINGLESS AT NESTING DEPTH ZERO !! 
 69=6    #NOR