{{htmlmetatags>metatag-description:(ICL George 3 and George 4 source: DFCOMPS)}}
====== DFCOMPS ======
(George Source)

**Macros used:** [[george:macro:BITDEFS|BITDEFS]], [[george:macro:DFDEF|DFDEF]]

<code - DFCOMPS.txt>22FL ...#     THIS SUBFILE CONTAINS COMPILATION IDENTIFIERS 
22^= ...#  USED BY THE LIBRARIAN AND IPB ROUTINES.  
23DW ...#   
4RT2    #     FIELD DEFINITIONS 
4S#L    #   
4SS=    #     MAGNETIC TAPE DECKS   
4T?W    #   
4TRG          DFDEF    LOAD,1,23,23 
4W?6          DFDEF    POOL,1,22,22 
4WQQ          DFDEF    WORK,1,21,21 
4X=B          DFDEF    PWORK,1,20,20
4XQ2          DFDEF    NONS,1,19,19 
4Y9L          DFDEF    TBITS,1,19,23
4YP=          DFDEF    REW,1,18,18  
4^8W          DFDEF    UNL,1,17,17  
4^NG          DFDEF    SMODE,1,11,16
4^Y# ...      DFDEF    DUMP,1,10,10 
5286          DFDEF    TSN,2,0,23   
529# ...#   
52=G ...#  AND THE IDENTIFIERS USED FOR :SYSTEM.DOCUMENT ENTRIES
52?N ...#  ORDINARY IDENTIFIERS REFER TO FWB,FRB,FMAGH BLOCK POINTERS   
52#W ...#  'N' IDENTIFIERS REFER TO 'STEP' POINTERS.
52B4 ...#   
52C= ...#DEF  FSDSTAT  = A1+21  
52DD ...#DEF  FSDSTATN  = 21
52FL ...#   
52GS ...      BITDEFS  FSDSTAT,2,BFSHMCB
52J2 ...      BITDEFS  FSDSTATN,2,BNFSHMCB  
52K8 ...#   
52LB ...#   
52MQ    #   
537B    #     TYPE 28 IPB   
53M2    #   
546L          DFDEF    LKCT,0,0,23  
54L=          DFDEF    ERCT,6,12,23 
555W          DFDEF    RGM,6,0,0
55KG          DFDEF    IDENT1,7,0,23
5656          DFDEF    IDENT2,8,0,23
^^^^ ...26757035000400000000
</code>