From 68c945a5fa5dc53b0f7cb225c18a7c6029e44e3c Mon Sep 17 00:00:00 2001
From: kitty <nepeta@canaglie.net>
Date: Fri, 27 Feb 2026 02:59:07 +1100
Subject: */mod */ %

---
 jefs.fs | 7 ++++---
 1 file 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
-- 
cgit v1.2.3