version 1.26, 2001/02/24 17:24:45
|
version 1.27, 2001/03/18 22:20:27
|
Line 196 AUser last-compiled \ address of the las
|
Line 196 AUser last-compiled \ address of the las
|
\ 0 if last xt cannot be combined (basic block boundary) |
\ 0 if last xt cannot be combined (basic block boundary) |
0 last-compiled ! |
0 last-compiled ! |
|
|
|
has? peephole [IF] |
0 value peeptable \ initialized in boot |
0 value peeptable \ initialized in boot |
|
[THEN] |
|
|
has? glocals [IF] |
has? glocals [IF] |
User locals-size \ this is the current size of the locals stack |
User locals-size \ this is the current size of the locals stack |