47SB [ 48#2 [ 48RL [??? ELSF SECT DEVT FGN 1 DOC 49?= [ 49QW #MAC ELSF 4==G [ ==== 4=Q6 [ 4?9Q [ ENSURES: 4?PB [ DEPTH NON-ZERO 4#92 [ CURRENT STRUCTURE = CONDITIONAL 4#NL [ 'OR' NOT EXPECTED 4*8= [ 'THEN' FOUND 4*MW [ SETS: 4B7G [ 'THEN' NOT FOUND 4BM6 [ COMPILES: 4C6Q [ BRN TO END OF CONDITIONAL 4CLB [ 'ELSE' LABEL 4D62 [ A JUMP OR BRANCH 4DKL [ 4F5= #UNS NESTDEPTH 4FJW ( 4G4G STRUCTURE 1,CHECK 4GJ6 FLAGTEST ELSF,0,NOT,1,,THEN 4H3Q #ALT NESTFLAG=NESTFLAG$1 [CLEAR 'THEN' 4HHB #SKI NESTDEPTH/9 4J32 ( 4JGL #ALT 20?=NESTDEPTH-9 4K2= NESTBRANCH RN,NIF8 4KFW #ALT 20?=NESTDEPTH-9 4K^G NESTLABEL NIF7,FREE 4LF6 #ALT 20?=NESTDEPTH-9 4LYQ GOIFALSE NIF7,NIF6,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%- 4MDB P,%Q,%R,%S,%T,%U,%V 4MY2 #EXI 4NCL ) 4NX= #ALT 20?=NESTDEPTH-1 4PBW NESTBRANCH RN,NIF3 4PWG #ALT 20?=NESTDEPTH-1 4QB6 NESTLABEL NIF2,FREE 4QTQ #ALT 20?=NESTDEPTH-1 4R*B GOIFALSE NIF2,NIF1,%A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%- 4RT2 P,%Q,%R,%S,%T,%U,%V 4S#L #EXI 4SS= ) 4T?W !! MEANINGLESS AT NESTING DEPTH ZERO !! 4TRG #NOR