diff options
Diffstat (limited to 'jefs.fs')
| -rw-r--r-- | jefs.fs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -354,7 +354,7 @@ make line-buffer line-buffer-length allot \ seem to be having issues with old words being interpreted : refill ( -- ? ) source-id 0< if false [ ret, ] then 0 >in ! line-buffer tib ! line-buffer line-buffer-length accept - 0= if ?dup 0= if false [ ret, ] then then #tib ! true ; + 0= if dup 0= if #tib ! false [ ret, ] then then #tib ! true ; \ bug: C-d causes stack underflow : quit 0 to source-id [compile] [ begin refill while interpret ." ok" cr repeat ; |
