LFBLCNUM

(GIN Macro)
Defined in: MACS LIST
LFBLCNUM.mac.txt
 27BD ...[   
 27BF ...[ TO CALCULATE THE NUMBER OF BLOCKS IN A GOUT/INFO CHAIN
 27BG ...#MAC  LFBLCNUM  
 27BH ...[ %A IS AN ACC TO CONTAIN THE ANSWER NOT X0 
 27BJ ...[ %B CONTAINS A POINTER TO THE GOUT/INFO BLOCK  
 27BL ...      LDN   %A 1
 27BQ ...      JBS      M1LFBLCNUM,%B,BLFONLINE  
 27BW ...      ADN   %A 1
 27C2 ...M1LFBLCNUM  
 27C6 ...      JBC      M2LFBLCNUM,%B,BLFSETUP   
 27C= ...      ADN   %A 1
 27CB ...M2LFBLCNUM  
 27CG ...      JBC      M3LFBLCNUM,%B,BLFPROPREC 
 27CL ...      ADN   %A 1
 27CQ ...M3LFBLCNUM  
 27CW ...      JBC      M4LFBLCNUM,%B,BLFWLSIZE  
 27D2 ...      ADN   %A 1
 27D6 ...M4LFBLCNUM  
 27D= ...#NOR