ENRING

(GIN Macro)

Defined in: COREMACROS

Used in: ACCESS867, BSQ867, CAFSPERI867, CHCH865, CLOSEONE867, COREALLF867, COREALLJ865, FAILTWIN866, IDFPER867, INTWIN866, LISTFIND867, LISTINIT867, LISTINTC865, LISTNIP865, PCTSTART867, RESTBLOK850, RIGHT867, SETJOBQ867, TWINSETA866, TWINSETB866, TWINSETD866, UNSAVE867

ENRING.mac.txt

 C^G# ...[??? ENRING SECT CENT FGN 32 DOC
 C^Q6    #   
 D29Q    #     ENRINGS AN ELEMENT ON TO AN EXISTING RING(WHICH MAY BE EMPTY) AT  
 D2PB    #     A SPECIFID POINT  
 D392    #MAC  ENRING
 D3NL    #STR  %A,1  
 D48=          LDX   1  %A   
 D4MW    #STR  %B,2  
 D57G          LDX   2  %B   
 D5M6          CALL  0  (ENRING) 
 D66Q    #NOR