{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: MFTAB)}}
====== MFTAB ======
(GIN Macro)
**Defined in:** [[george:source:MACROS_MSYS|MACROS MSYS]]
**Used in:**
32YN ...[??? MFTAB SECT CENT FGN 56 DOC
338G #
33N6 #
347Q # HERE FOLLOWS MFTAB **** MFTAB
34MB # IT IS USED IN AUXILMF TO SET UP BY RECURSIVELY
3572 # CALLING ITSELF A TABLE OF HALF-WORD ENTRIES.
35LL # %A=NUMBER OF ENTRIES LEFT TO SET UP
35P9 ...# %B=SEGMENT ADDRESS SCANNED TO SO FAR
35RS ...#
35WC ...# OR IT IS USED WITH %A NULL TO SCAN THE SEGMENT BUFFER
35^2 ...# %B=START ADDRESS
363K ...# %C=COMPILER VARIABLE TO STORE RESULT IN
366= #
36KW #MAC MFTAB
36R4 ...#STR %A
36Y= ...(
375G #SKI %A<1$1
37K6 (
384Q #HAL TAB,0
38JB #EXI
3942 )
39HL #SKI %A-1<1$1
3=3= (
3=GW ...#HAL %B,TAB
3?2G 0
3?G6 #EXI
3?^Q )
3#?* ...#DEF 21?=%B
3#JY ... MFTAB ,21?,22?
3#WH ...#HAL 21?,22?
3*86 ...#DEF 20?=%A-2
3*FP ... MFTAB ,22?,21?
3*R# ... MFTAB 20?,21?
3B4X ...#EXI
3BBG ...)
3BN5 ...#DEF 23?=34?+%B+1]
3B^N ...#DEF %C=34?+%B]̉+11/4+%B
3C?? ...#EXI 23?
3CJW ... MFTAB ,%C,%C
3CWQ #NOR