version 1.159, 2006/03/25 18:37:15
|
version 1.160, 2006/04/17 17:22:38
|
Line 3245 Cond: IS T ' >body @ H compile AL
|
Line 3245 Cond: IS T ' >body @ H compile AL
|
: IS T >address ' >body @ ! H ; |
: IS T >address ' >body @ ! H ; |
Cond: TO T ' >body @ H compile ALiteral compile ! ;Cond |
Cond: TO T ' >body @ H compile ALiteral compile ! ;Cond |
: TO T ' >body @ ! H ; |
: TO T ' >body @ ! H ; |
|
Cond: CTO T ' >body H compile ALiteral compile ! ;Cond |
|
: CTO T ' >body ! H ; |
[ELSE] |
[ELSE] |
Cond: IS T ' >body H compile ALiteral compile ! ;Cond |
Cond: IS T ' >body H compile ALiteral compile ! ;Cond |
: IS T >address ' >body ! H ; |
: IS T >address ' >body ! H ; |