version 1.25, 2009/12/31 15:32:36
|
version 1.26, 2010/03/09 16:18:58
|
Line 38 UNLOCK Tlast @ TNIL Tlast ! LOCK
|
Line 38 UNLOCK Tlast @ TNIL Tlast ! LOCK
|
: [THEN] |
: [THEN] |
-1 countif +! ?if ; immediate |
-1 countif +! ?if ; immediate |
: [ELSE] |
: [ELSE] |
postpone [THEN] postpone [IF] ; |
postpone [THEN] postpone [IF] ; immediate |
immediate |
|
' [IF] Alias [IFDEF] immediate |
' [IF] Alias [IFDEF] immediate |
' [IF] Alias [IFUNDEF] immediate |
' [IF] Alias [IFUNDEF] immediate |
' [THEN] Alias [ENDIF] immediate |
' [THEN] Alias [ENDIF] immediate |