summaryrefslogtreecommitdiff
path: root/jefs.fs
diff options
context:
space:
mode:
Diffstat (limited to 'jefs.fs')
-rw-r--r--jefs.fs8
1 files changed, 5 insertions, 3 deletions
diff --git a/jefs.fs b/jefs.fs
index ea8f740..a1757ca 100644
--- a/jefs.fs
+++ b/jefs.fs
@@ -262,9 +262,6 @@ variable hld
1 constant w/o
2 constant r/w
-8192 constant file-buffer-length
-make file-buffer file-buffer-length allot
-
\ TODO error handling (0< abs → errno i think)
\ flags are zero on success
\ maybe there should be some sort of read buffering support here
@@ -274,6 +271,11 @@ make file-buffer file-buffer-length allot
: write-file ( c-addr u fd -- ?u flag ) >r swap r> syswrite errno ;
\ }}}
+\ USER INPUT {{{
+8192 constant file-buffer-length
+make file-buffer file-buffer-length allot
+\ }}}
+
\ INTERACTIVITY {{{
\ i hate dealing with user input!!!
\ but my idea is: when reading forth from a file,