show the data stack at the prompt if non-empty
This commit is contained in:
parent
11b5b3e7ed
commit
a143fdf7a4
|
|
@ -2169,7 +2169,7 @@ STDIN TTY? CONSTANT INTERACTIVE?
|
||||||
REFILL 0= IF BYE THEN
|
REFILL 0= IF BYE THEN
|
||||||
INTERPRET
|
INTERPRET
|
||||||
[ INTERACTIVE? ] [IF]
|
[ INTERACTIVE? ] [IF]
|
||||||
STATE @ 0= IF "OK\n" TYPE THEN
|
STATE @ 0= IF DEPTH IF .S THEN "OK\n" TYPE THEN
|
||||||
[THEN]
|
[THEN]
|
||||||
AGAIN ;
|
AGAIN ;
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue