(GIN Macro)
Defined in: IFMACS
Used in: CDUM866, CHNUMCON867, FORMLOOP865, INCRCUBX860, IPBLISTA867, IPBLISTD867, LISTAST867, LISTOPEN867, LISTPARS867, LISTRING864, LOADERI867, LOADERMT867, MESSA, MESSAB, MESSAC, MESSAE, MESSAJ, MESSB, MESSBH, MESSC, MESSCC, MESSCG, MESSCH, MESSCI, MESSCJ, MESSD, MESSDA, MESSDB, MESSE, MESSH, MESSI, OPER864, OPERA864, OPERIN867, PMBUFFS84, RESTERR864, SHOWCOMM864, WA864, WHATRVS867, WHATRVSA867, WLAA867, WLB867, WLC867, WLD864, WLE862, WLF862, WLOUT865, WTSTAT867
4W?6 [ 4WQQ [ 4X=B [??? OR SECT DEVT FGN 1 DOC 4XQ2 [ 4Y9L #MAC OR 4YP= [ == 4^8W [ 4^NG [ ENSURES: 5286 [ DEPTH NON-ZERO 52MQ [ 'THEN' / 'DO' NOT FOUND 537B [ 'OR' EXPECTED 53M2 [ COMPILES: 546L [ A JUMP OR BRANCH 54L= [ LABEL FOR START OF NEXT CONDITION STEP 555W [ 55KG #UNS NESTDEPTH 5656 ( 56JQ FLAGTEST OR,1,,0,NOT,THEN/DO 574B #ALT NESTEITHERS=NESTEITHERS$1 [CLEAR 'EITHER' 57J2 #SKI NESTDEPTH/9 583L ( 58H= GOIFALSE NIF7,NIF6,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%- 592W P,%Q,%R,%S,%T,%U,%V 59GG #ALT 20?=NESTDEPTH-9 5=26 #STR EITHER,%A 5=FQ ( 5=^B NESTLABEL NIF6,FREE 5?F2 #EXI 5?YL ) 5#D= NESTLABEL NIF7,FREE 5#XW #EXI 5*CG ) 5*X6 GOIFALSE NIF2,NIF1,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%- 5BBQ P,%Q,%R,%S,%T,%U,%V 5BWB #ALT 20?=NESTDEPTH-1 5CB2 #STR EITHER,%A 5CTL ( 5D*= NESTLABEL NIF1,FREE 5DSW #EXI 5F#G ) 5FS6 NESTLABEL NIF2,FREE 5G?Q #EXI 5GRB ) 5H?2 !! MEANINGLESS AT NESTING DEPTH ZERO !! 5HQL #NOR