1 INST_ADDR(paren_docol),
2 INST_ADDR(paren_docon),
3 INST_ADDR(paren_dovar),
4 INST_ADDR(paren_douser),
5 INST_ADDR(paren_dodefer),
6 INST_ADDR(paren_field),
7 INST_ADDR(paren_doval),
8 INST_ADDR(paren_dodoes),
9 INST_ADDR(paren_does_handler),
10 GROUPADD(9)
11 GROUP( control, 9)
12 INST_ADDR(noop),
13 INST_ADDR(call),
14 INST_ADDR(execute),
15 INST_ADDR(perform),
16 INST_ADDR(semis),
17 INST_ADDR(unloop),
18 INST_ADDR(lit_perform),
19 INST_ADDR(does_exec),
20 GROUPADD(8)
21 #ifdef HAS_GLOCALS
22 INST_ADDR(branch_lp_plus_store_number),
23 GROUPADD(1)
24 #endif
25 INST_ADDR(branch),
26 INST_ADDR(question_branch),
27 GROUPADD(2)
28 #ifdef HAS_GLOCALS
29 INST_ADDR(question_branch_lp_plus_store_number),
30 GROUPADD(1)
31 #endif
32 GROUPADD(0)
33 #ifdef HAS_XCONDS
34 INST_ADDR(question_dupe_question_branch),
35 INST_ADDR(question_dupe_zero_equals_question_branch),
36 GROUPADD(2)
37 #endif
38 INST_ADDR(paren_next),
39 GROUPADD(1)
40 #ifdef HAS_GLOCALS
41 INST_ADDR(paren_next_lp_plus_store_number),
42 GROUPADD(1)
43 #endif
44 INST_ADDR(paren_loop),
45 GROUPADD(1)
46 #ifdef HAS_GLOCALS
47 INST_ADDR(paren_loop_lp_plus_store_number),
48 GROUPADD(1)
49 #endif
50 INST_ADDR(paren_plus_loop),
51 GROUPADD(1)
52 #ifdef HAS_GLOCALS
53 INST_ADDR(paren_plus_loop_lp_plus_store_number),
54 GROUPADD(1)
55 #endif
56 GROUPADD(0)
57 #ifdef HAS_XCONDS
58 INST_ADDR(paren_minus_loop),
59 GROUPADD(1)
60 #ifdef HAS_GLOCALS
61 INST_ADDR(paren_minus_loop_lp_plus_store_number),
62 GROUPADD(1)
63 #endif
64 INST_ADDR(paren_symmetric_plus_loop),
65 GROUPADD(1)
66 #ifdef HAS_GLOCALS
67 INST_ADDR(paren_symmetric_plus_loop_lp_plus_store_number),
68 GROUPADD(1)
69 #endif
70 GROUPADD(0)
71 #endif
72 INST_ADDR(paren_for),
73 INST_ADDR(paren_do),
74 INST_ADDR(paren_question_do),
75 GROUPADD(3)
76 #ifdef HAS_XCONDS
77 INST_ADDR(paren_plus_do),
78 INST_ADDR(paren_u_plus_do),
79 INST_ADDR(paren_minus_do),
80 INST_ADDR(paren_u_minus_do),
81 GROUPADD(4)
82 #endif
83 INST_ADDR(i),
84 INST_ADDR(i_tick),
85 INST_ADDR(j),
86 INST_ADDR(k),
87 GROUPADD(4)
88 GROUP( strings, 44)
89 INST_ADDR(move),
90 INST_ADDR(c_move),
91 INST_ADDR(c_move_up),
92 INST_ADDR(fill),
93 INST_ADDR(compare),
94 INST_ADDR(toupper),
95 INST_ADDR(capscompare),
96 INST_ADDR(slash_string),
97 GROUPADD(8)
98 GROUP( arith, 52)
99 INST_ADDR(lit),
100 INST_ADDR(plus),
101 INST_ADDR(lit_plus),
102 INST_ADDR(under_plus),
103 INST_ADDR(minus),
104 INST_ADDR(negate),
105 INST_ADDR(one_plus),
106 INST_ADDR(one_minus),
107 INST_ADDR(max),
108 INST_ADDR(min),
109 INST_ADDR(abs),
110 INST_ADDR(star),
111 INST_ADDR(slash),
112 INST_ADDR(mod),
113 INST_ADDR(slash_mod),
114 INST_ADDR(star_slash_mod),
115 INST_ADDR(star_slash),
116 INST_ADDR(two_star),
117 INST_ADDR(two_slash),
118 INST_ADDR(f_m_slash_mod),
119 INST_ADDR(s_m_slash_rem),
120 INST_ADDR(m_star),
121 INST_ADDR(u_m_star),
122 INST_ADDR(u_m_slash_mod),
123 INST_ADDR(m_plus),
124 INST_ADDR(d_plus),
125 INST_ADDR(d_minus),
126 INST_ADDR(d_negate),
127 INST_ADDR(d_two_star),
128 INST_ADDR(d_two_slash),
129 INST_ADDR(and),
130 INST_ADDR(or),
131 INST_ADDR(x_or),
132 INST_ADDR(invert),
133 INST_ADDR(r_shift),
134 INST_ADDR(l_shift),
135 GROUPADD(36)
136 GROUP( compare, 88)
137 INST_ADDR(zero_equals),
138 INST_ADDR(zero_not_equals),
139 INST_ADDR(zero_less_than),
140 INST_ADDR(zero_greater_than),
141 INST_ADDR(zero_less_or_equal),
142 INST_ADDR(zero_greater_or_equal),
143 INST_ADDR(equals),
144 INST_ADDR(not_equals),
145 INST_ADDR(less_than),
146 INST_ADDR(greater_than),
147 INST_ADDR(less_or_equal),
148 INST_ADDR(greater_or_equal),
149 INST_ADDR(u_equals),
150 INST_ADDR(u_not_equals),
151 INST_ADDR(u_less_than),
152 INST_ADDR(u_greater_than),
153 INST_ADDR(u_less_or_equal),
154 INST_ADDR(u_greater_or_equal),
155 GROUPADD(18)
156 #ifdef HAS_DCOMPS
157 INST_ADDR(d_equals),
158 INST_ADDR(d_not_equals),
159 INST_ADDR(d_less_than),
160 INST_ADDR(d_greater_than),
161 INST_ADDR(d_less_or_equal),
162 INST_ADDR(d_greater_or_equal),
163 INST_ADDR(d_zero_equals),
164 INST_ADDR(d_zero_not_equals),
165 INST_ADDR(d_zero_less_than),
166 INST_ADDR(d_zero_greater_than),
167 INST_ADDR(d_zero_less_or_equal),
168 INST_ADDR(d_zero_greater_or_equal),
169 INST_ADDR(d_u_equals),
170 INST_ADDR(d_u_not_equals),
171 INST_ADDR(d_u_less_than),
172 INST_ADDR(d_u_greater_than),
173 INST_ADDR(d_u_less_or_equal),
174 INST_ADDR(d_u_greater_or_equal),
175 GROUPADD(18)
176 #endif
177 INST_ADDR(within),
178 GROUPADD(1)
179 GROUP( stack, 125)
180 INST_ADDR(useraddr),
181 INST_ADDR(up_store),
182 INST_ADDR(sp_fetch),
183 INST_ADDR(sp_store),
184 INST_ADDR(rp_fetch),
185 INST_ADDR(rp_store),
186 GROUPADD(6)
187 #ifdef HAS_FLOATING
188 INST_ADDR(fp_fetch),
189 INST_ADDR(fp_store),
190 GROUPADD(2)
191 #endif
192 INST_ADDR(to_r),
193 INST_ADDR(r_from),
194 INST_ADDR(rdrop),
195 INST_ADDR(two_to_r),
196 INST_ADDR(two_r_from),
197 INST_ADDR(two_r_fetch),
198 INST_ADDR(two_r_drop),
199 INST_ADDR(over),
200 INST_ADDR(drop),
201 INST_ADDR(swap),
202 INST_ADDR(dupe),
203 INST_ADDR(rote),
204 INST_ADDR(not_rote),
205 INST_ADDR(nip),
206 INST_ADDR(tuck),
207 INST_ADDR(question_dupe),
208 INST_ADDR(pick),
209 INST_ADDR(two_drop),
210 INST_ADDR(two_dupe),
211 INST_ADDR(two_over),
212 INST_ADDR(two_swap),
213 INST_ADDR(two_rote),
214 INST_ADDR(two_nip),
215 INST_ADDR(two_tuck),
216 GROUPADD(24)
217 GROUP( memory, 157)
218 INST_ADDR(fetch),
219 INST_ADDR(lit_fetch),
220 INST_ADDR(store),
221 INST_ADDR(plus_store),
222 INST_ADDR(c_fetch),
223 INST_ADDR(c_store),
224 INST_ADDR(two_store),
225 INST_ADDR(two_fetch),
226 INST_ADDR(cell_plus),
227 INST_ADDR(cells),
228 INST_ADDR(char_plus),
229 INST_ADDR(paren_chars),
230 INST_ADDR(count),
231 GROUPADD(13)
232 GROUP( compiler, 170)
233 GROUPADD(0)
234 #ifdef HAS_F83HEADERSTRING
235 INST_ADDR(paren_f83find),
236 GROUPADD(1)
237 #else /* 171 */
238 INST_ADDR(paren_listlfind),
239 GROUPADD(1)
240 #ifdef HAS_HASH
241 INST_ADDR(paren_hashlfind),
242 INST_ADDR(paren_tablelfind),
243 INST_ADDR(paren_hashkey1),
244 GROUPADD(3)
245 #endif
246 GROUPADD(0)
247 #endif
248 INST_ADDR(paren_parse_white),
249 INST_ADDR(aligned),
250 INST_ADDR(f_aligned),
251 INST_ADDR(threading_method),
252 GROUPADD(4)
253 GROUP( hostos, 179)
254 INST_ADDR(paren_key_file),
255 INST_ADDR(key_q_file),
256 INST_ADDR(stdin),
257 INST_ADDR(stdout),
258 INST_ADDR(stderr),
259 GROUPADD(5)
260 #ifdef HAS_OS
261 INST_ADDR(form),
262 INST_ADDR(wcwidth),
263 INST_ADDR(flush_icache),
264 INST_ADDR(paren_bye),
265 INST_ADDR(paren_system),
266 INST_ADDR(getenv),
267 INST_ADDR(open_pipe),
268 INST_ADDR(close_pipe),
269 INST_ADDR(time_and_date),
270 INST_ADDR(ms),
271 INST_ADDR(allocate),
272 INST_ADDR(free),
273 INST_ADDR(resize),
274 INST_ADDR(strerror),
275 INST_ADDR(strsignal),
276 INST_ADDR(call_c),
277 GROUPADD(16)
278 #endif
279 GROUPADD(0)
280 #ifdef HAS_FILE
281 INST_ADDR(close_file),
282 INST_ADDR(open_file),
283 INST_ADDR(create_file),
284 INST_ADDR(delete_file),
285 INST_ADDR(rename_file),
286 INST_ADDR(file_position),
287 INST_ADDR(reposition_file),
288 INST_ADDR(file_size),
289 INST_ADDR(resize_file),
290 INST_ADDR(read_file),
291 INST_ADDR(paren_read_line),
292 GROUPADD(11)
293 #endif
294 INST_ADDR(write_file),
295 INST_ADDR(emit_file),
296 GROUPADD(2)
297 #ifdef HAS_FILE
298 INST_ADDR(flush_file),
299 INST_ADDR(file_status),
300 INST_ADDR(file_eof_query),
301 INST_ADDR(open_dir),
302 INST_ADDR(read_dir),
303 INST_ADDR(close_dir),
304 INST_ADDR(match_file),
305 INST_ADDR(set_dir),
306 INST_ADDR(get_dir),
307 INST_ADDR(equals_mkdir),
308 GROUPADD(10)
309 #endif
310 INST_ADDR(newline),
311 GROUPADD(1)
312 #ifdef HAS_OS
313 INST_ADDR(utime),
314 INST_ADDR(cputime),
315 GROUPADD(2)
316 #endif
317 GROUPADD(0)
318 #ifdef HAS_FLOATING
319 GROUPADD(0)
320 GROUP( floating, 226)
321 INST_ADDR(f_equals),
322 INST_ADDR(f_not_equals),
323 INST_ADDR(f_less_than),
324 INST_ADDR(f_greater_than),
325 INST_ADDR(f_less_or_equal),
326 INST_ADDR(f_greater_or_equal),
327 INST_ADDR(f_zero_equals),
328 INST_ADDR(f_zero_not_equals),
329 INST_ADDR(f_zero_less_than),
330 INST_ADDR(f_zero_greater_than),
331 INST_ADDR(f_zero_less_or_equal),
332 INST_ADDR(f_zero_greater_or_equal),
333 INST_ADDR(s_to_f),
334 INST_ADDR(d_to_f),
335 INST_ADDR(f_to_d),
336 INST_ADDR(f_to_s),
337 INST_ADDR(f_store),
338 INST_ADDR(f_fetch),
339 INST_ADDR(d_f_fetch),
340 INST_ADDR(d_f_store),
341 INST_ADDR(s_f_fetch),
342 INST_ADDR(s_f_store),
343 INST_ADDR(f_plus),
344 INST_ADDR(f_minus),
345 INST_ADDR(f_star),
346 INST_ADDR(f_slash),
347 INST_ADDR(f_star_star),
348 INST_ADDR(fm_star),
349 INST_ADDR(fm_slash),
350 INST_ADDR(fm_star_slash),
351 INST_ADDR(fm_square),
352 INST_ADDR(f_negate),
353 INST_ADDR(f_drop),
354 INST_ADDR(f_dupe),
355 INST_ADDR(f_swap),
356 INST_ADDR(f_over),
357 INST_ADDR(f_rote),
358 INST_ADDR(f_nip),
359 INST_ADDR(f_tuck),
360 INST_ADDR(float_plus),
361 INST_ADDR(floats),
362 INST_ADDR(floor),
363 INST_ADDR(f_round),
364 INST_ADDR(f_max),
365 INST_ADDR(f_min),
366 INST_ADDR(represent),
367 INST_ADDR(to_float),
368 INST_ADDR(f_abs),
369 INST_ADDR(f_a_cos),
370 INST_ADDR(f_a_sine),
371 INST_ADDR(f_a_tan),
372 INST_ADDR(f_a_tan_two),
373 INST_ADDR(f_cos),
374 INST_ADDR(f_e_x_p),
375 INST_ADDR(f_e_x_p_m_one),
376 INST_ADDR(f_l_n),
377 INST_ADDR(f_l_n_p_one),
378 INST_ADDR(f_log),
379 INST_ADDR(f_a_log),
380 INST_ADDR(f_sine),
381 INST_ADDR(f_sine_cos),
382 INST_ADDR(f_square_root),
383 INST_ADDR(f_tan),
384 INST_ADDR(f_cinch),
385 INST_ADDR(f_cosh),
386 INST_ADDR(f_tan_h),
387 INST_ADDR(f_a_cinch),
388 INST_ADDR(f_a_cosh),
389 INST_ADDR(f_a_tan_h),
390 INST_ADDR(s_floats),
391 INST_ADDR(d_floats),
392 INST_ADDR(s_f_aligned),
393 INST_ADDR(d_f_aligned),
394 INST_ADDR(v_star),
395 INST_ADDR(faxpy),
396 GROUPADD(75)
397 #endif
398 GROUPADD(0)
399 #ifdef HAS_GLOCALS
400 GROUPADD(0)
401 GROUP( locals, 301)
402 INST_ADDR(fetch_local_number),
403 INST_ADDR(fetch_local_zero),
404 INST_ADDR(fetch_local_four),
405 INST_ADDR(fetch_local_eight),
406 INST_ADDR(fetch_local_twelve),
407 GROUPADD(5)
408 #ifdef HAS_FLOATING
409 INST_ADDR(f_fetch_local_number),
410 INST_ADDR(f_fetch_local_zero),
411 INST_ADDR(f_fetch_local_eight),
412 GROUPADD(3)
413 #endif
414 INST_ADDR(laddr_number),
415 INST_ADDR(lp_plus_store_number),
416 INST_ADDR(minus_four_lp_plus_store),
417 INST_ADDR(eight_lp_plus_store),
418 INST_ADDR(sixteen_lp_plus_store),
419 INST_ADDR(lp_store),
420 INST_ADDR(to_l),
421 GROUPADD(7)
422 #ifdef HAS_FLOATING
423 INST_ADDR(f_to_l),
424 INST_ADDR(fpick),
425 GROUPADD(2)
426 #endif
427 GROUPADD(0)
428 #endif
429 GROUPADD(0)
430 #ifdef HAS_OS
431 GROUPADD(0)
432 GROUP( syslib, 318)
433 INST_ADDR(open_lib),
434 INST_ADDR(lib_sym),
435 INST_ADDR(wcall),
436 INST_ADDR(u_w_fetch),
437 INST_ADDR(s_w_fetch),
438 INST_ADDR(w_store),
439 INST_ADDR(u_l_fetch),
440 INST_ADDR(s_l_fetch),
441 INST_ADDR(l_store),
442 INST_ADDR(lib_error),
443 GROUPADD(10)
444 #endif
445 GROUPADD(0)
446 GROUP( peephole, 328)
447 GROUPADD(0)
448 #ifdef HAS_PEEPHOLE
449 INST_ADDR(compile_prim1),
450 INST_ADDR(finish_code),
451 INST_ADDR(forget_dyncode),
452 INST_ADDR(decompile_prim),
453 INST_ADDR(set_next_code),
454 INST_ADDR(call2),
455 INST_ADDR(tag_offsets),
456 GROUPADD(7)
457 #endif
458 GROUPADD(0)
459 GROUP( static_super, 335)
460 GROUPADD(0)
461 GROUP( end, 335)
462