(GIN Macro)
Defined in: IFMACS
Used in:
8TNB ...[ 8TNL ...[ 8TP= [ HERE FOLLOW THE UTILITY MACROS 8W8W [ ================================ 8WNG [ 8X86 [ 8XMQ [??? BRANCHIF SECT DEVT FGN 1 DOC 8Y7B [ 8YM2 #MAC BRANCHIF 8^6L [ ======== 8^L= [ 925W [ 92KG [ %A - LABEL ROOT 9356 [ %B - BRANCH DEFINER 93JQ [ %C - (OPTIONAL) ACCUMULATOR, OR STORE LOCATION TO BE LOADED INTO X0 944B [ (ONLY USED FOR VISIBLE REGISTER DEFINERS) 94J2 [ %D - (OPTIONAL) OPERAND FOR MACRO BRANCH DEFINER 953L [ 95H= [ LOADS X0 IF NECESSARY, SETS UP THE BRANCH AND CALLS 'NESTBRANCH' TO 962W [ PUT THE APPROPRIATE NUMBER (NESTDEPTH MOD 9, HELD IN 20?) OF N'S AT 96GG [ THE START OF THE LABEL ROOT 9726 [ 97FQ #STR %C 97^B ( 98F2 #ACC %C 98YL ( 99D= LDX 0 %C 99XW BRANCHIF %A,%B,0,%D 9=CG #EXI 9=X6 ) 9?BQ ) 9?WB #ALT 20?=NESTDEPTH-1 9#B2 #SKI NESTDEPTH/9 9#TL #ALT 20?=20?-8 9**= #STR %D 9*SW ( 9B#G NESTBRANCH X%B %C %D,%A 9BS6 #EXI 9C?Q ) 9CRB NESTBRANCH %B %C,%A 9D?2 #NOR