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

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

**Used in:** [[george:source:COREALLG82|COREALLG82]], [[george:source:UNJAMMER866|UNJAMMER866]]

<code - FREEIN.mac.txt>
 3FW? ...[??? FREEIN SECT CENT FGN   
 3FWL ...[   
 3FW^ ...[ENTRY SEQUENCE FOR CHAINING BLK INTO SIZE RING (IN STRUCTURED FREECORE)
 3FX# ...[   
 3FXM ...#MAC  FREEIN
 3FY2 ...#STR  %A,1  
 3FY* ...      LDX   1  %A                  [ADDRESS OF BLOCK
 3FYN ...      CALL  0  (GFRIN)  
 3F^3 ...#NOR
</code>