bug fix to use stream

diff --git a/stdio.asm b/stdio.asm
index e07e809d8bba5deda2d599f73c9660a1cfd04f2d..99bac9eb290532001312dcf7fb3db975de493c49 100644 (file)
--- a/stdio.asm
+++ b/stdio.asm
@@ -245,7 +245,7 @@ p_read_word_nomore:
        next
 
 p_read_word_skipline:
-       DOFORTH p_dup, p_read_stream_char
+       DOFORTH p_Rget, p_read_stream_char
        pop rbx
        cmp bl,0
        jl p_read_word_nomore
@@ -278,7 +278,7 @@ p_double_quote_endstream:
        lea rdi,[p_pad_DFA]
        add rdi,qword [rsp]
        mov byte [rdi],0
-       ;; copy PAD string into new temp object
+       ;; copy PAD string + NUL into new temp object
        inc qword [rsp]
        DOFORTH p_str2temp
        dec qword [rsp]