From 1cd7946e3842f365017764104a6d2164de1fb037 Mon Sep 17 00:00:00 2001
From: kitty <nepeta@canaglie.net>
Date: Fri, 20 Feb 2026 00:47:42 +1100
Subject: nip, split u. and . into (u.) and (.) intrnl forms

---
 jefs.fs | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/jefs.fs b/jefs.fs
index bbe6160..656463e 100644
--- a/jefs.fs
+++ b/jefs.fs
@@ -7,6 +7,7 @@
 : decimal 10 base ! ;
 : hex 16 base ! ;
 
+: nip swap drop ;
 : tuck swap over ;
 
 hex
@@ -53,7 +54,9 @@ variable hld
 : #s begin # dup 0= until ;
 : #> drop hld @ pad over - ;
 
-: u. <# #s #> say space ;
-: . dup abs <# #s swap sign #> say space ;
+: (u.) <# #s #> ;
+: u. (u.) say space ;
+: (.) dup abs <# #s swap sign #> ;
+: . (.) say space ;
 
 bye
-- 
cgit v1.2.3