show the data stack at the prompt if non-empty

This commit is contained in:
Jesse D. McDonald 2020-11-07 11:03:08 -06:00
parent 11b5b3e7ed
commit a143fdf7a4
1 changed files with 1 additions and 1 deletions

View File

@ -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 ;