home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GEMini Atari
/
GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso
/
files
/
language
/
prolog68
/
encoder.wam
< prev
next >
Wrap
Text File
|
1993-10-23
|
18KB
|
260 lines
WAM assembler
p'assemble_code'/6 98 98 528 94 6 94 97 368 'end' 369 512 16 4 -16 5 -12
96 288 289 243 20 179 0 3 148 -12 118 -8 119 -4 514 p'instr'/8 0 160 -4
16 161 -8 16 146 -12 147 -16 513 28 515 p'fixup'/4 520
p'breakpoint_class'/2 150 150 528 146 146 78 532 18 8 48 'disj_end' 49 0
3 518 533 16 48 'cond_start' 49 0 11 518 533 16 48 'cond_cut' 49 0 19 518
534 48 'cond_end' 49 0 27 518 529 56 [ 'cond_cut' -34 'cond_end' -18 'cond_start'
-52 'disj_end' -70] 520
p'con_instr'/6 242 242 528 202 238 162 532 76 24 512 12 1 -12 5 -8 80 'get'/1
289 402 480 4 500 434 176 0 387 117 -4 514 p'opt_instr'/6 0 144 -12 161
-4 12 146 -8 513 24 515 p'const_arg'/3 533 74 512 12 1 -12 5 -8 80 'put'/1
289 402 480 4 500 434 176 0 1411 117 -4 514 p'opt_instr'/6 0 144 -12 161
-4 12 146 -8 513 24 515 p'const_arg'/3 534 48 'unify' 100 368 0 2947 241
0 289 402 480 6 500 467 245 8 515 p'const_arg'/3 530 24 [ 'get'/1 -194 'put'/1
-118] 520
p'const_arg'/3 88 88 532 76 12 97 512 8 273 371 291 354 240 2080 516 664
547 400 480 8 502 480 3 500 432 243 8 113 -4 514 p'split_int'/3 0 384 480
16383 505 449 513 20 518 534 97 352 354 518
p'enc_hash_tab'/5 130 130 528 126 26 12 532 16 20 64 65 36 12 547 518 534
512 20 2 -12 4 -4 96 292 276 84 '-'/2 288 292 97 289 371 290 275 99 291
273 83 'd'/4 338 368 0 35 324 322 514 p'key_rep'/2 0 144 -20 145 -16 146
-12 147 -8 148 -4 513 32 515 p'enc_hash_tab'/5 520
p'fixup'/4 124 124 528 120 110 12 532 14 16 64 65 35 8 518 533 42 96 292
288 84 'd'/4 292 293 294 295 547 406 404 405 500 501 471 515 p'fixup'/4
534 96 292 288 84 'b'/2 292 293 97 324 371 325 289 402 480 4 500 434 515
p'fixup'/4 535 -90 16 537 -50 520
p'func_rep'/3 16 16 240 2080 241 2084 242 2088 517 520
p'instr'/8 5458 5458 528 5112 5454 4852 532 24 32 48 'end' 65 71 36 12 38
20 518 533 20 48 'skip' 97 288 289 515 p'instr'/8 533 22 80 'label'/1 355
97 288 289 515 p'instr'/8 533 106 97 512 32 279 278 2 -24 3 -20 4 -16 5
-12 6 -8 80 'break'/1 288 103 295 272 87 'b'/2 340 289 514 p'breakpoint_class'/2
0 144 -32 145 -28 146 -24 147 -20 148 -16 149 -12 150 -8 151 -4 513 44 515
p'instr'/8 533 112 97 512 32 279 278 2 -24 4 -20 6 -16 7 -12 80 'unify_void'/1
289 243 8 245 16 176 0 2051 115 -8 117 -4 514 p'opt_instr'/6 0 144 -32 145
-28 146 -24 163 -8 32 148 -20 165 -4 32 150 -16 151 -12 513 44 515 p'instr'/8
533 112 97 512 32 279 278 2 -24 4 -20 6 -16 7 -12 80 'put_variable'/1 289
243 8 245 16 176 0 1027 115 -8 117 -4 514 p'opt_instr'/6 0 144 -32 145 -28
146 -24 163 -8 32 148 -20 165 -4 32 150 -16 151 -12 513 44 515 p'instr'/8
533 130 97 512 32 279 278 2 -24 4 -20 6 -16 7 -12 80 'moveregister'/2 289
295 480 4 407 502 439 403 480 2 500 434 245 16 229 327 272 176 0 1923 115
-8 514 p'opt_instr'/6 0 144 -32 145 -28 146 -24 163 -8 32 148 -20 149 -4
150 -16 151 -12 513 44 515 p'instr'/8 533 102 97 512 32 279 278 2 -24 4
-20 6 -16 7 -12 80 'var'/3 288 290 289 116 -8 118 -4 514 p'var_instr'/7
0 144 -32 145 -28 146 -24 163 -8 32 148 -20 165 -4 32 150 -16 151 -12 513
44 515 p'instr'/8 533 108 97 512 32 279 278 2 -24 4 -20 6 -16 7 -12 80 'con'/2
288 289 243 8 245 16 115 -8 117 -4 514 p'con_instr'/6 0 144 -32 145 -28
146 -24 163 -8 32 148 -20 165 -4 32 150 -16 151 -12 513 44 515 p'instr'/8
533 106 97 512 32 279 278 2 -24 4 -20 6 -16 7 -12 80 'nil'/1 288 243 4 245
12 114 -8 116 -4 514 p'nil_instr'/5 0 144 -32 145 -28 146 -24 163 -8 32
148 -20 165 -4 32 150 -16 151 -12 513 44 515 p'instr'/8 533 108 97 512 32
279 278 2 -24 4 -20 6 -16 7 -12 80 'str'/2 288 289 243 8 245 16 115 -8 117
-4 514 p'str_instr'/6 0 144 -32 145 -28 146 -24 163 -8 32 148 -20 165 -4
32 150 -16 151 -12 513 44 515 p'instr'/8 533 106 97 512 32 279 278 2 -24
4 -20 6 -16 7 -12 80 'lst'/1 288 243 4 245 12 114 -8 116 -4 514 p'lst_instr'/5
0 144 -32 145 -28 146 -24 163 -8 32 148 -20 165 -4 32 150 -16 151 -12 513
44 515 p'instr'/8 533 66 80 'push_integer'/1 296 97 288 289 101 368 0 3843
371 328 293 480 -32768 408 487 408 481 0 32768 486 547 403 480 4 500 435
515 p'instr'/8 533 114 97 512 32 279 278 2 -24 4 -20 6 -12 7 -8 80 'push_integer'/1
288 101 368 0 3851 371 289 371 290 275 403 480 6 500 416 514 p'split_int'/3
0 144 -32 145 -28 146 -24 147 -4 148 -20 149 -16 150 -12 151 -8 513 44 515
p'instr'/8 533 66 80 'pop_integer'/1 296 97 288 289 101 368 0 3859 371 328
293 480 -32768 408 487 408 481 0 32768 486 547 403 480 4 500 435 515 p'instr'/8
533 114 97 512 32 279 278 2 -24 4 -20 6 -12 7 -8 80 'pop_integer'/1 288
101 368 0 3867 371 289 371 290 275 403 480 6 500 416 514 p'split_int'/3
0 144 -32 145 -28 146 -24 147 -4 148 -20 149 -16 150 -12 151 -8 513 44 515
p'instr'/8 533 46 80 'cmp'/1 368 'eq' 97 288 289 101 368 0 3875 293 403
480 2 500 435 515 p'instr'/8 533 46 80 'cmp'/1 368 'ne' 97 288 289 101 368
0 3883 293 403 480 2 500 435 515 p'instr'/8 533 46 80 'cmp'/1 368 'lt' 97
288 289 101 368 0 3891 293 403 480 2 500 435 515 p'instr'/8 533 46 80 'cmp'/1
368 'le' 97 288 289 101 368 0 3899 293 403 480 2 500 435 515 p'instr'/8
533 46 80 'cmp'/1 368 'gt' 97 288 289 101 368 0 3907 293 403 480 2 500 435
515 p'instr'/8 533 46 80 'cmp'/1 368 'ge' 97 288 289 101 368 0 3915 293
403 480 2 500 435 515 p'instr'/8 533 76 80 'jmp'/2 368 'eq' 296 97 288 289
101 368 0 3923 371 297 293 103 298 295 90 'd'/4 355 368 0 19 328 329 403
480 4 500 435 515 p'instr'/8 533 76 80 'jmp'/2 368 'ne' 296 97 288 289 101
368 0 3931 371 297 293 103 298 295 90 'd'/4 355 368 0 19 328 329 403 480
4 500 435 515 p'instr'/8 533 76 80 'jmp'/2 368 'lt' 296 97 288 289 101 368
0 3939 371 297 293 103 298 295 90 'd'/4 355 368 0 19 328 329 403 480 4 500
435 515 p'instr'/8 533 76 80 'jmp'/2 368 'le' 296 97 288 289 101 368 0 3947
371 297 293 103 298 295 90 'd'/4 355 368 0 19 328 329 403 480 4 500 435
515 p'instr'/8 533 76 80 'jmp'/2 368 'gt' 296 97 288 289 101 368 0 3955
371 297 293 103 298 295 90 'd'/4 355 368 0 19 328 329 403 480 4 500 435
515 p'instr'/8 533 76 80 'jmp'/2 368 'ge' 296 97 288 289 101 368 0 3963
371 297 293 103 298 295 90 'd'/4 355 368 0 19 328 329 403 480 4 500 435
515 p'instr'/8 533 40 48 'op_neg' 97 288 289 101 368 0 3971 293 403 480
2 500 435 515 p'instr'/8 533 40 48 'op_not' 97 288 289 101 368 0 3979 293
403 480 2 500 435 515 p'instr'/8 533 40 48 'op_abs' 97 288 289 101 368 0
3987 293 403 480 2 500 435 515 p'instr'/8 533 40 48 'op_add' 97 288 289
101 368 0 4003 293 403 480 2 500 435 515 p'instr'/8 533 40 48 'op_sub' 97
288 289 101 368 0 4011 293 403 480 2 500 435 515 p'instr'/8 533 40 48 'op_mul'
97 288 289 101 368 0 4019 293 403 480 2 500 435 515 p'instr'/8 533 40 48
'op_div' 97 288 289 101 368 0 4027 293 403 480 2 500 435 515 p'instr'/8
533 40 48 'op_mod' 97 288 289 101 368 0 4035 293 403 480 2 500 435 515 p'instr'/8
533 40 48 'op_and' 97 288 289 101 368 0 4043 293 403 480 2 500 435 515 p'instr'/8
533 40 48 'op_or' 97 288 289 101 368 0 4051 293 403 480 2 500 435 515 p'instr'/8
533 40 48 'op_xor' 97 288 289 101 368 0 4059 293 403 480 2 500 435 515 p'instr'/8
533 40 48 'op_shl' 97 288 289 101 368 0 4067 293 403 480 2 500 435 515 p'instr'/8
533 40 48 'op_shr' 97 288 289 101 368 0 4075 293 403 480 2 500 435 515 p'instr'/8
533 56 80 'allocate'/1 296 97 288 289 101 368 0 4099 371 297 293 480 4 408
502 473 403 480 4 500 435 515 p'instr'/8 533 62 80 'deallocate'/1 296 97
288 289 101 368 0 4107 371 297 293 480 4 408 480 3 500 502 473 403 480 4
500 435 515 p'instr'/8 533 136 97 512 32 279 278 2 -24 4 -20 6 -12 7 -8
80 'call'/2 295 294 87 '/'/2 288 289 101 368 0 4115 371 290 371 293 275
480 4 406 502 469 403 480 8 500 416 514 p'proc_rep'/3 0 144 -32 145 -28
146 -24 147 -4 148 -20 149 -16 150 -12 151 -8 513 44 515 p'instr'/8 533
118 97 512 32 279 278 2 -24 4 -20 6 -12 7 -8 80 'execute'/1 370 '/'/2 288
289 101 368 0 4123 371 290 275 403 480 6 500 416 514 p'proc_rep'/3 0 144
-32 145 -28 146 -24 147 -4 148 -20 149 -16 150 -12 151 -8 513 44 515 p'instr'/8
533 132 97 512 40 281 280 2 -32 4 -28 101 368 0 4131 371 273 277 6 -20 7
-16 80 'call_builtin'/1 370 '/'/2 288 289 403 480 4 500 418 114 -4 514 p'builtin'/3
0 480 4 384 502 449 144 -40 145 -36 146 -32 147 -12 148 -28 149 -24 150
-20 151 -16 513 52 515 p'instr'/8 533 132 97 512 40 281 280 2 -32 4 -28
101 368 0 4139 371 273 277 6 -20 7 -16 80 'execute_builtin'/1 370 '/'/2
288 289 403 480 4 500 418 114 -4 514 p'builtin'/3 0 480 4 384 502 449 144
-40 145 -36 146 -32 147 -12 148 -28 149 -24 150 -20 151 -16 513 52 515 p'instr'/8
533 40 48 'proceed' 97 288 289 101 368 0 4147 293 403 480 2 500 435 515
p'instr'/8 533 70 80 'jump'/1 296 97 288 289 101 368 0 4155 371 297 293
103 298 295 90 'd'/4 355 368 0 19 328 329 403 480 4 500 435 515 p'instr'/8
533 40 48 'fail' 97 288 289 101 368 0 4163 293 403 480 2 500 435 515 p'instr'/8
533 140 80 'switch_on'/4 368 'term' 296 297 298 97 288 289 101 368 0 4227
371 299 371 300 371 301 293 103 302 371 303 60 371 303 64 295 94 'd'/4 355
368 0 19 330 331 95 60 'd'/4 323 368 0 19 329 332 95 64 'd'/4 323 368 0
19 328 333 403 480 8 500 435 515 p'instr'/8 533 198 97 512 56 285 284 2
-48 3 -20 4 -44 101 368 0 4235 371 272 371 275 281 6 -36 7 -12 80 'switch_on'/3
368 'constant' 288 277 113 -8 127 2048 -32 127 2048 -28 514 p'real_tab_size'/2
0 480 8 385 480 1 501 502 448 388 480 4 500 480 8 385 502 500 455 144 -24
145 -16 146 -20 147 -12 148 -28 514 p'enc_hash_tab'/5 24 144 -32 145 -28
146 -24 147 -8 148 -20 149 -16 150 -12 167 -4 32 513 44 515 p'instr'/8 533
198 97 512 56 285 284 2 -48 3 -20 4 -44 101 368 0 4243 371 272 371 275 281
6 -36 7 -12 80 'switch_on'/3 368 'structure' 288 277 113 -8 127 2048 -32
127 2048 -28 514 p'real_tab_size'/2 0 480 8 385 480 1 501 502 448 388 480
4 500 480 8 385 502 500 455 144 -24 145 -16 146 -20 147 -12 148 -28 514
p'enc_hash_tab'/5 24 144 -32 145 -28 146 -24 147 -8 148 -20 149 -16 150
-12 167 -4 32 513 44 515 p'instr'/8 533 84 80 'try_me_else'/1 296 97 288
289 101 368 0 4259 371 297 371 298 293 103 299 295 91 'd'/4 355 368 0 19
328 329 480 4 402 502 474 403 480 6 500 435 515 p'instr'/8 533 70 80 'retry_me_else'/1
296 97 288 289 101 368 0 4267 371 297 293 103 298 295 90 'd'/4 355 368 0
19 328 329 403 480 4 500 435 515 p'instr'/8 533 40 48 'trust_me_else_fail'
97 288 289 101 368 0 4275 293 403 480 2 500 435 515 p'instr'/8 533 84 80
'try'/1 296 97 288 289 101 368 0 4283 371 297 371 298 293 103 299 295 91
'd'/4 355 368 0 51 328 329 480 4 402 502 474 403 480 6 500 435 515 p'instr'/8
533 70 80 'retry'/1 296 97 288 289 101 368 0 4291 371 297 293 103 298 295
90 'd'/4 355 368 0 35 328 329 403 480 4 500 435 515 p'instr'/8 533 70 80
'trust'/1 296 97 288 289 101 368 0 4299 371 297 293 103 298 295 90 'd'/4
355 368 0 19 328 329 403 480 4 500 435 515 p'instr'/8 533 70 80 'try_else'/1
296 97 288 289 101 368 0 4307 371 297 293 103 298 295 90 'd'/4 355 368 0
19 328 329 403 480 4 500 435 515 p'instr'/8 533 70 80 'retry_else'/1 296
97 288 289 101 368 0 4315 371 297 293 103 298 295 90 'd'/4 355 368 0 19
328 329 403 480 4 500 435 515 p'instr'/8 533 40 48 'trust_else_fail' 97
288 289 101 368 0 4323 293 403 480 2 500 435 515 p'instr'/8 534 48 'dynamic_else'
97 288 289 101 368 0 4331 371 368 0 3 371 368 0 3 371 368 0 3 371 368 0
3 371 368 0 3 371 368 0 3 371 368 0 3 371 368 0 3 371 368 0 3 371 368 0
3 371 296 293 480 4 402 502 472 403 480 16 500 435 515 p'instr'/8 529 248
[ 'dynamic_else' -136 'end' -4844 'fail' -1334 'op_abs' -2558 'op_add' -2516
'op_and' -2306 'op_div' -2390 'op_mod' -2348 'op_mul' -2432 'op_neg' -2642
'op_not' -2600 'op_or' -2264 'op_shl' -2180 'op_shr' -2138 'op_sub' -2474
'op_xor' -2222 'proceed' -1448 'skip' -4820 'trust_else_fail' -176 'trust_me_else_fail'
-592] 530 248 [ 'allocate'/1 -2356 'break'/1 -5034 'call'/2 -2234 'call_builtin'/1
-1976 'cmp'/1 256 'con'/2 -4462 'deallocate'/1 -2298 'execute'/1 -2096 'execute_builtin'/1
-1842 'jmp'/2 282 'jump'/1 -1666 'label'/1 -5058 'lst'/1 -4134 'moveregister'/2
-4698 'nil'/1 -4352 'pop_integer'/1 308 'push_integer'/1 318 'put_variable'/1
-4812 'retry'/1 -724 'retry_else'/1 -508 'retry_me_else'/1 -924 'str'/2
-4244 'switch_on'/3 328 'switch_on'/4 -1552 'trust'/1 -652 'try'/1 -810
'try_else'/1 -580 'try_me_else'/1 -1010 'unify_void'/1 -4926 'var'/3 -4566]
535 -3920 32 536 -3876 536 -3832 536 -3788 536 -3744 537 -3698 535 -3658
32 536 -3584 536 -3510 536 -3436 536 -3362 537 -3286 535 -4156 32 537 -4090
535 -4350 32 537 -4284 535 -1744 32 537 -1546 520
p'key_rep'/2 44 44 528 6 36 36 532 26 8 80 '/'/2 288 241 8 289 547 515 p'func_rep'/3
534 33 0 518
p'lst_instr'/5 158 158 528 118 154 90 532 40 20 80 'get'/1 244 20 243 16
242 12 241 8 289 176 0 771 515 p'opt_instr'/6 533 38 80 'put'/1 244 20 243
16 242 12 241 8 289 176 0 1795 515 p'opt_instr'/6 534 48 'unify' 99 368
0 2971 356 401 480 2 500 466 518 530 24 [ 'get'/1 -110 'put'/1 -70] 520
p'nil_instr'/5 158 158 528 118 154 90 532 40 20 80 'get'/1 244 20 243 16
242 12 241 8 289 176 0 515 515 p'opt_instr'/6 533 38 80 'put'/1 244 20 243
16 242 12 241 8 289 176 0 1539 515 p'opt_instr'/6 534 48 'unify' 99 368
0 2955 356 401 480 2 500 466 518 530 24 [ 'get'/1 -110 'put'/1 -70] 520
p'opt_instr'/6 86 86 532 40 24 100 292 357 401 480 15 486 547 400 401 500
468 402 480 2 500 467 518 534 100 292 371 294 357 400 480 15 500 468 480
4 401 502 470 402 480 4 500 467 518
p'opt_instr_neg'/6 92 92 532 46 24 100 292 357 401 480 -16 488 547 400 480
1 501 401 501 468 402 480 2 500 467 518 534 100 292 371 294 357 400 480
15 500 468 480 4 401 502 470 402 480 4 500 467 518
p'proc_rep'/3 34 34 240 2080 241 2084 129 241 2088 516 520 241 2080 242
2084 143 2088 517 524
p'real_tab_size'/2 78 78 528 30 30 6 532 20 8 48 0 11 49 0 19 547 518 534
512 8 1 -8 400 480 2 503 432 113 -4 514 p'real_tab_size'/2 0 384 480 2 502
449 513 20 518
p'split_int'/3 26 26 400 480 16 509 465 400 401 480 16 508 501 466 518
p'str_instr'/6 242 242 528 202 238 162 532 76 24 512 12 1 -12 5 -8 80 'get'/1
289 402 480 4 500 434 176 0 643 117 -4 514 p'opt_instr'/6 0 144 -12 161
-4 12 146 -8 513 24 515 p'struct_arg'/3 533 74 512 12 1 -12 5 -8 80 'put'/1
289 402 480 4 500 434 176 0 1667 117 -4 514 p'opt_instr'/6 0 144 -12 161
-4 12 146 -8 513 24 515 p'struct_arg'/3 534 48 'unify' 100 368 0 2963 241
0 289 402 480 6 500 467 245 8 515 p'struct_arg'/3 530 24 [ 'get'/1 -194
'put'/1 -118] 520
p'struct_arg'/3 40 40 528 6 36 36 80 '/'/2 288 291 97 292 354 243 4 244
8 515 p'func_rep'/3 520
p'var_instr'/7 1660 1660 528 1578 1656 1442 532 62 28 80 'save'/1 368 'cutpt'
82 'y'/1 290 101 368 0 4355 371 293 358 547 480 4 402 502 469 403 480 4
500 468 518 533 60 80 'save'/1 368 'b' 82 'y'/1 290 101 368 0 4363 371 293
358 547 480 4 402 502 469 403 480 4 500 468 518 533 58 80 'save'/1 368 'b'
82 'x'/1 290 101 368 0 4371 371 293 358 480 4 402 502 469 403 480 4 500
468 518 533 38 48 'cut' 50 'cutpt' 101 368 0 4379 358 547 403 480 2 500
468 518 533 54 48 'cut' 82 'y'/1 290 101 368 0 4387 371 293 358 547 480
4 402 502 469 403 480 4 500 468 518 533 52 48 'cut' 82 'x'/1 290 101 368
0 4395 371 293 358 480 4 402 502 469 403 480 4 500 468 518 533 52 48 'push'
49 'value' 82 'y'/1 289 547 243 8 244 12 245 16 246 20 176 0 3075 515 p'opt_instr_neg'/6
533 50 48 'push' 49 'value' 82 'x'/1 289 243 8 244 12 245 16 246 20 176
0 3203 515 p'opt_instr'/6 533 52 48 'pop' 49 'variable' 82 'y'/1 289 547
243 8 244 12 245 16 246 20 176 0 3331 515 p'opt_instr_neg'/6 533 52 48 'pop'
49 'variable' 82 'x'/1 289 547 243 8 244 12 245 16 246 20 176 0 3459 515
p'opt_instr'/6 533 52 48 'pop' 49 'value' 82 'y'/1 289 547 243 8 244 12
245 16 246 20 176 0 3587 515 p'opt_instr_neg'/6 533 50 48 'pop' 49 'value'
82 'x'/1 289 243 8 244 12 245 16 246 20 176 0 3715 515 p'opt_instr'/6 533
72 49 'variable' 80 'get'/1 289 82 'y'/1 295 547 480 4 407 502 439 403 480
2 500 434 244 12 245 16 229 327 358 176 0 3 515 p'opt_instr'/6 533 72 49
'value' 80 'get'/1 289 82 'y'/1 295 547 480 4 407 502 439 403 480 2 500
434 244 12 245 16 229 327 358 176 0 131 515 p'opt_instr'/6 533 70 49 'value'
80 'get'/1 289 82 'x'/1 295 480 4 407 502 439 403 480 2 500 434 244 12 245
16 229 327 358 176 0 259 515 p'opt_instr'/6 533 72 49 'variable' 80 'put'/1
289 82 'y'/1 295 547 480 4 407 502 439 403 480 2 500 434 244 12 245 16 229
327 358 176 0 899 515 p'opt_instr'/6 533 72 49 'value' 80 'put'/1 289 82
'y'/1 295 547 480 4 407 502 439 403 480 2 500 434 244 12 245 16 229 327
358 176 0 1155 515 p'opt_instr'/6 533 90 80 'put'/1 295 81 'unsafe_value'/1
296 82 'y'/1 297 480 4 409 502 441 480 4 408 502 440 403 480 4 500 434 244
12 245 16 229 329 371 328 358 247 4 176 0 1283 515 p'opt_instr'/6 533 52
48 'unify' 49 'variable' 82 'y'/1 289 547 243 8 244 12 245 16 246 20 176
0 2179 515 p'opt_instr_neg'/6 533 52 48 'unify' 49 'variable' 82 'x'/1 289
547 243 8 244 12 245 16 246 20 176 0 2307 515 p'opt_instr'/6 533 52 48 'unify'
49 'value' 82 'y'/1 289 547 243 8 244 12 245 16 246 20 176 0 2435 515 p'opt_instr_neg'/6
533 52 48 'unify' 49 'value' 82 'x'/1 289 547 243 8 244 12 245 16 246 20
176 0 2563 515 p'opt_instr'/6 533 52 48 'unify' 49 'local_value' 82 'y'/1
289 547 243 8 244 12 245 16 246 20 176 0 2691 515 p'opt_instr_neg'/6 534
48 'unify' 49 'local_value' 82 'x'/1 289 243 8 244 12 245 16 246 20 176
0 2819 515 p'opt_instr'/6 529 56 [ 'cut' 64 'pop' 78 'push' 96 'unify' 106]
535 -1320 28 536 -1284 537 -1230 535 -1078 28 536 -1028 536 -978 537 -926
535 -1202 28 537 -1150 535 -432 28 536 -382 536 -332 536 -282 536 -232 537
-182 530 24 [ 'get'/1 32 'put'/1 46 'save'/1 60] 535 -954 28 536 -884 537
-812 535 -748 28 536 -678 537 -606 535 -1636 28 536 -1578 537 -1518 520