version 1.47, 2007/12/31 18:40:26
|
version 1.49, 2011/11/16 01:25:58
|
Line 45 has? floating [IF]
|
Line 45 has? floating [IF]
|
\G @i{c-char} is the character value for a space. |
\G @i{c-char} is the character value for a space. |
\ used by docon:, must be constant |
\ used by docon:, must be constant |
|
|
has? EC [IF] 40 [ELSE] FF [THEN] Constant /line |
has? EC [IF] 20 cells [ELSE] FF [THEN] Constant /line |
|
|
has? file [IF] |
has? file [IF] |
40 Constant c/l |
40 Constant c/l |
Line 199 AUser dpp normal-dp dpp !
|
Line 199 AUser dpp normal-dp dpp !
|
\ the pointer to the current dictionary pointer |
\ the pointer to the current dictionary pointer |
\ ist reset to normal-dp on (doerror) |
\ ist reset to normal-dp on (doerror) |
\ (i.e. any throw caught by quit) |
\ (i.e. any throw caught by quit) |
AUser LastCFA |
has? ec [IF] |
|
AUser LastCFA |
|
[THEN] |
AUser Last |
AUser Last |
|
|
has? flash [IF] |
has? flash [IF] |