1 <BLOCK (<ROOT>)> <NEWTYPE LOSE FIX><ENDBLOCK>
3 <GDECL (THE-BIG-LABELS PRE-NAMES PRE-OPTS) LIST>
5 <GDECL (STACK-DEPTH) FIX (WINNING-VICTIM) <OR FALSE FIX>>
7 <GDECL (COMPARERS) <VECTOR [REST ATOM]>>
9 <GDECL (NEXT-FLUSH CODE-LENGTH GLUE-PC) FIX>
11 <GDECL (TYPE-WORDS TYPE-LENGTHS) <VECTOR [REST ATOM FIX]>>
13 <NEWTYPE I$TERMIN WORD>
21 <NEWTYPE ADECL VECTOR>
31 '!<<PRIMTYPE VECTOR> ATOM
34 <LIST [REST LABSTATE]>
40 <SETG LAB-NAM <OFFSET 1 LAB>>
42 <SETG LAB-IND <OFFSET 2 LAB>>
44 <SETG LAB-LOOP <OFFSET 3 LAB>>
46 <SETG LAB-STATE <OFFSET 4 LAB>>
48 <SETG LAB-FINAL-STATE <OFFSET 5 LAB>>
50 <SETG LAB-VISIT-MARK <OFFSET 6 LAB>>
52 <SETG LAB-CODE-PNTR <OFFSET 7 LAB>>
54 <SETG LAB-DEAD-VARS <OFFSET 8 LAB>>
56 <MANIFEST LAB-NAM LAB-IND LAB-LOOP LAB-STATE LAB-FINAL-STATE LAB-VISIT-MARK
57 LAB-CODE-PNTR LAB-DEAD-VARS>
61 '<<PRIMTYPE VECTOR> AC
67 <SETG ACS-AC <OFFSET 1 ACSTATE>>
69 <SETG ACS-LOCAL <OFFSET 2 ACSTATE>>
71 <SETG ACS-STORED <OFFSET 3 ACSTATE>>
73 <SETG ACS-TYPE <OFFSET 4 ACSTATE>>
75 <SETG ACS-CODE <OFFSET 5 ACSTATE>>
77 <MANIFEST ACS-AC ACS-LOCAL ACS-STORED ACS-TYPE ACS-CODE>
79 <NEWTYPE LABSTATE VECTOR '!<<PRIMTYPE VECTOR> [6 ACSTATE]>>
83 <NEWTYPE T$UNBOUND WORD>
89 <NEWTYPE XTYPE-C ATOM>
91 <NEWTYPE XTYPE-W ATOM>
93 <NEWTYPE CHANNEL-ROUTINE LIST>
97 '<<PRIMTYPE VECTOR> ATOM <OR FALSE ATOM> LOCAL-NAME <OR FALSE ATOM>
98 <OR FALSE ACSTATE> <OR FALSE ACSTATE>>>
100 <NEWTYPE LOCAL-NAME FIX>
102 <NEWTYPE CONST-W-LOCAL LIST>
104 <NEWTYPE CONSTANT WORD>
106 <NEWTYPE CONSTANT-LABEL FIX>
108 <SETG LATM <OFFSET 1 LOCAL>>
110 <SETG LUPD <OFFSET 2 LOCAL>>
112 <SETG LNAME <OFFSET 3 LOCAL>>
114 <SETG LDECL <OFFSET 4 LOCAL>>
116 <SETG LAST-ACST <OFFSET 5 LOCAL>>
118 <SETG LAST-ACSV <OFFSET 6 LOCAL>>
120 <MANIFEST LATM LUPD LNAME LDECL LAST-ACST LAST-ACSV>
122 <SETG MAX-IMMEDIATE 262143>
126 '<<PRIMTYPE VECTOR> ATOM
133 <GDECL (ACA-AC AC-BOTH) <OR AC FALSE>>
135 <SETG AC-NAME <OFFSET 1 AC>>
137 <SETG AC-ITEM <OFFSET 2 AC>>
139 <SETG AC-CODE <OFFSET 3 AC>>
141 <SETG AC-TIME <OFFSET 4 AC>>
143 <SETG AC-UPDATE <OFFSET 5 AC>>
145 <SETG AC-TYPE <OFFSET 6 AC>>
147 <MANIFEST AC-NAME AC-ITEM AC-CODE AC-TIME AC-UPDATE AC-TYPE>
149 <GDECL (AC-PAIR-TABLE AC-TABLE)
151 (AC-STAMP VISIT-COUNT)
154 <VECTOR [REST ACSTATE]>>
156 <GDECL (MVECTOR FINAL-LOCALS TYPED-LOCALS LABELS CLABELS)
158 (LBLSEQ CONSTSEQ NRARGS MAX-IMMEDIATE)
160 (ICALL-TAGS CODE LOCALS ICALL-TEMPS ALL-ICALL-TEMPS ALL-TEMP-CC TEMP-CC)
162 (FREE-CONSTS CONSTANT-VECTOR) <LIST [REST CONSTANT-BUCKET]>
166 <GDECL (ACS) <VECTOR [REST ATOM FIX]>>
167 <DEFMAC WIDTH-MUNG ('CHANX 'W) <FORM M-HLEN .CHANX .W>>
169 <SETG OUTPUT-LENGTH 1024>
171 <MANIFEST OUTPUT-LENGTH>
173 <NEWTYPE CONSTANT-BUCKET VECTOR
174 '<<PRIMTYPE VECTOR> <OR ATOM CONSTANT CONST-W-LOCAL> FIX CONSTANT-LABEL
177 <MSETG CB-VAL <OFFSET 1 CONSTANT-BUCKET>>
179 <MSETG CB-HASH <OFFSET 2 CONSTANT-BUCKET>>
181 <MSETG CB-LAB <OFFSET 3 CONSTANT-BUCKET>>
183 <MSETG CB-LOC <OFFSET 4 CONSTANT-BUCKET>>
185 <MSETG CONSTANT-TABLE-LENGTH 1001>
187 <GDECL (CONSTANT-TABLE) <VECTOR [REST <LIST [REST CONSTANT-BUCKET]>]>>
189 <NEWTYPE MBUCK VECTOR '<<PRIMTYPE VECTOR> ANY FIX FIX>>
191 <MSETG MV-VAL <OFFSET 1 MBUCK>>
193 <MSETG MV-HASH <OFFSET 2 MBUCK>>
195 <MSETG MV-LOC <OFFSET 3 MBUCK>>
197 <MSETG MV-TABLE-LENGTH 391>
199 <GDECL (MV-TABLE) <VECTOR [REST <LIST [REST MBUCK]>]> (MV-COUNT) FIX>
201 <NEWTYPE SUBR-INFO VECTOR>