version 1.144, 2003/10/09 14:15:19
|
version 1.145, 2003/10/09 20:25:59
|
Line 887 stack inst-stream IP Cell
|
Line 887 stack inst-stream IP Cell
|
endif |
endif |
2drop ; |
2drop ; |
|
|
|
|
|
defer output-nextp0 |
|
:noname ( -- ) |
|
." NEXT_P0;" cr ; |
|
is output-nextp0 |
|
|
|
defer output-nextp1 |
|
:noname ( -- ) |
|
." NEXT_P1;" cr ; |
|
is output-nextp1 |
|
|
: output-nextp2 ( -- ) |
: output-nextp2 ( -- ) |
." NEXT_P2;" cr ; |
." NEXT_P2;" cr ; |
|
|
Line 901 variable tail-nextp2 \ xt to execute for
|
Line 912 variable tail-nextp2 \ xt to execute for
|
\ the final part of the generated C code, with xt printing LABEL2 or not. |
\ the final part of the generated C code, with xt printing LABEL2 or not. |
output-super-end |
output-super-end |
print-debug-results |
print-debug-results |
." NEXT_P1;" cr |
output-nextp1 |
stores |
stores |
fill-state |
fill-state |
xt execute ; |
xt execute ; |
Line 909 variable tail-nextp2 \ xt to execute for
|
Line 920 variable tail-nextp2 \ xt to execute for
|
: output-c-tail1-no-stores { xt -- } |
: output-c-tail1-no-stores { xt -- } |
\ the final part of the generated C code for combinations |
\ the final part of the generated C code for combinations |
output-super-end |
output-super-end |
." NEXT_P1;" cr |
output-nextp1 |
fill-state |
fill-state |
xt execute ; |
xt execute ; |
|
|
Line 952 variable tail-nextp2 \ xt to execute for
|
Line 963 variable tail-nextp2 \ xt to execute for
|
." {" cr |
." {" cr |
." DEF_CA" cr |
." DEF_CA" cr |
print-declarations |
print-declarations |
." NEXT_P0;" cr |
output-nextp0 |
spill-state |
spill-state |
fetches |
fetches |
print-debug-args |
print-debug-args |
Line 1454 variable reprocessed-num 0 reprocessed-n
|
Line 1465 variable reprocessed-num 0 reprocessed-n
|
." {" cr |
." {" cr |
." DEF_CA" cr |
." DEF_CA" cr |
print-declarations-combined |
print-declarations-combined |
." NEXT_P0;" cr |
output-nextp0 |
spill-state |
spill-state |
\ fetches \ now in parts |
\ fetches \ now in parts |
\ print-debug-args |
\ print-debug-args |