| they cannot be combined, xt is 0."" |
they cannot be combined, xt is 0."" |
| xt = peephole_opt(xt1, xt2, wpeeptable); |
xt = peephole_opt(xt1, xt2, wpeeptable); |
| |
|
| lit_plus = lit + |
|
| |
|
| call ( #a_callee -- R:a_retaddr ) |
call ( #a_callee -- R:a_retaddr ) |
| ""Call callee (a variant of docol with inline argument)."" |
""Call callee (a variant of docol with inline argument)."" |
| a_retaddr = (Cell *)IP; |
a_retaddr = (Cell *)IP; |
| useraddr ( #u -- a_addr ) |
useraddr ( #u -- a_addr ) |
| a_addr = (Cell *)(up+u); |
a_addr = (Cell *)(up+u); |
| |
|
| |
include(peeprules.vmg) |
| |
|
| \+ |
\+ |
