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