{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: TESTSLOWEST)}} ====== TESTSLOWEST ====== (GIN Macro) **Defined in:** [[george:source:RING-MACROS|RING-MACROS]] **Used in:** [[george:source:COMMFILE82|COMMFILE82]], [[george:source:READFILE84|READFILE84]] 55*N ...[??? TESTSLOW SECT FILE FGN 20 DOC 55KG #MAC TESTSLOWEST 5656 # JUMPS TO %B,IF ALL OTHER READERS IN FSTACK BLOCK POINTED TO BY %C 56JQ # READ MORE BLOCKS OF THE FILE THAN THE READER WITH ELEMENT AT %A. 574B LDEX 3 ARINGNO(%C) [CT FOR LOOP 57J2 SBN 3 1 583L BZE 3 %B [J IF ONLY 1 ELEMENT IN FSTACK BLOCK. 58H= ADN 3 1 592W LDX 0 3 59GG M4TESTSLOW 5=26 ADN %C FELLEN 5=FQ BCT 0 M4TESTSLOW 5=^B M2TESTSLOW 5?F2 SBN %C FELLEN 5?YL LDXC 0 A1+FGENERAL1(%C) 5#D= BCC M1TESTSLOW 5#XW LDX 0 FREADBLOCK+A1(%C) 5*CG BNG 0 M3TESTSLOW 5*X6 LDX 0 FREADBLOCK(%A) 5BBQ BNG 0 M1TESTSLOW 5BWB BXL 0 FREADBLOCK+A1(%C),M1TESTSLOW 5CB2 LDN 0 A1(%C) 5CTL SBN 0 0(%A) 5D*= BNZ 0 M3TESTSLOW 5DSW M1TESTSLOW 5F#G BCT 3 M2TESTSLOW 5FS6 BRN %B 5G?Q M3TESTSLOW 5GRB #NOR