example: write line from stdin to stdout

i am unnervingly close to interactive input surprisingly soon

1 files changed, 3 insertions, 1 deletions

diff --git a/jefs.fs b/jefs.fs
index e80b1d7..aa2d23c 100644
--- a/jefs.fs
+++ b/jefs.fs
@@ -258,4 +258,6 @@ make file-buffer file-buffer-length allot
 : write-file ( c-addr u fd -- ?u flag )  >r swap r> syswrite errno ;
 \ }}}
 
-.free bye
+file-buffer file-buffer-length stdin read-file drop file-buffer swap stdout write-file
+bye
+\ .free bye