duskos

commit aa64fcb015e34daca968c8e7ee5c0c17f2a363e5
parent fb71c8e10e67e1f27c3e3d1e2db8d4c6e51c4942
Author: Virgil Dupras <hsoft@hardcoded.net>
Date:   Mon, 12 Sep 2022 16:27:04 -0400

sys/io: fix broken stdout

Diffstat:
M
fs/cc/lib.fs
 | 
2
+-
M
fs/sys/io.fs
 | 
2
+-

2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/fs/cc/lib.fs b/fs/cc/lib.fs
@@ -11,4 +11,4 @@
         'd' of = swap . endof
         abort" unsupported fmt argument"
       endcase
-    else emit then next drop ;
+    else stdout then next drop ;
diff --git a/fs/sys/io.fs b/fs/sys/io.fs
@@ -13,7 +13,7 @@ struct+[ IO
 ]struct
 
 : stdin StdIn IO :getc ;
-: stdout StdOut IO :putc ;
+: stdout StdOut IO :putc not if _ioerr then ;
 : stdio$ ConsoleIn to StdIn ConsoleOut to StdOut ;
 
 \ TODO: move to IO struct