*/mod */ %

1 files changed, 4 insertions, 3 deletions

diff --git a/jefs.fs b/jefs.fs
index 42f32c4..52f9cc4 100644
--- a/jefs.fs
+++ b/jefs.fs
@@ -1,6 +1,5 @@
 \ i think something is going on with the stack. i dunno
 \ things TODO:
-\ better error handling
 \ :noname
 \ DO LOOP
 \ s\"
@@ -148,6 +147,9 @@ decimal
 : mod  /mod drop ;
 : negate  0 swap - ;
 : abs  dup 0< if negate then ;
+: */mod  >r * r> /mod ;
+: */  */mod nip ;
+: %  100 */ ;
 
 32 constant bl
 : space  bl emit ;
@@ -238,5 +240,4 @@ variable hld
 : read-file ( c-addr u fd -- ?u flag ) >r swap r> sysread errno ;
 \ }}}
 
-: t  r/o z" test" open-file .s drop close-file .s drop ;
-t .free bye
+.free bye