{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: BRANCHIF)}}
====== BRANCHIF ======
(GIN Macro)

**Defined in:** [[george:source:IFMACS|IFMACS]]

**Used in:** 

<code - BRANCHIF.mac.txt>
 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
</code>