Show pageBacklinksBack to top This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong. {{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: GOIFALSE)}} ====== GOIFALSE ====== (GIN Macro) **Defined in:** [[george:source:IFMACS|IFMACS]] **Used in:** <code - GOIFALSE.mac.txt> 9DQL [ 9F== [ 9FPW [??? GOIFALSE SECT DEVT FGN 1 DOC 9G9G [ 9GP6 #MAC GOIFALSE 9H8Q [ ======== 9HNB [ 9J82 [ 9JML [ %A - LABEL ROOT FOR STANDARD JUMP 9K7= [ %B - LABEL ROOT FOR IF 'EITHER' GIVEN, I.E. 'OR' EXPECTED TO FOLLOW 9KLW [ %C ... PARAMETERS TO THE CALLING USER LEVEL MACRO 9L6G [ 9LL6 [ IF 'EITHER' GIVEN THEN 9M5Q ...[ SETS 'OR EXPECTED' IN 'NESTEITHERS' 9MKB [ CALLS 'GOIFTRUE' WITHOUT THE 'EITHER' AND WITH %A, %B REVERSED 9N52 [ ELSE INVERTS JUMP DIRECTION BY 'IFN<CONDITION DEFINER>' MACRO 9NJL [ 9P4= #STR BOTH,%C ['BOTH' HAS NO EFFECT 9PHW #SKI 9Q3G ( 9QH6 GOIFALSE %A,%B,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T- 9R2Q ,%U,%V 9RGB #EXI 9S22 ) 9SFL #STR EITHER,%C ['EITHER' CHANGES JUMP 9S^= #SKI 9TDW ( 9TYG #ALT NESTEITHERS=NESTEITHERS^1 [SET 'EITHER' 9WD6 GOIFTRUE %B,%A,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T- 9WXQ ,%U,%V 9XCB #EXI 9XX2 ) 9YBL #ACC %C 9YW= ( 9^*W #STR +,%C 9^TG ( =2*6 IFN%C %A,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U- =2SQ ,%V,%W =3#B [ E.G. IFNCS NIF2 =3S2 [ OR IFNBS NIF1,2,BIT1 =4?L #EXI =4R= ) =5=W ) =5QG IFN%D %A,%C,%E =6=6 [ E.G. IFNGE NIF1,0,GSIGN =6PQ #NOR </code> Last modified: 17/01/2024 11:55by 127.0.0.1 Log In