From acd4c350073bdab710980c83ddea648a8b7b0919 Mon Sep 17 00:00:00 2001 From: kitty Date: Fri, 13 Mar 2026 20:36:56 +1100 Subject: jewelforth: version 1 well i guess that's how much i'm gonna get done today. i may take a lil Break now, (possibly writing Another forth x3) i've worked on this every day for over a month. which is a lot for me. seems like a good time to enter Version 1, even though there's still stuff i wish i got done. i'll get it done maybe probably at some point. --- jefs.fs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/jefs.fs b/jefs.fs index 458d324..10d4e9e 100644 --- a/jefs.fs +++ b/jefs.fs @@ -540,7 +540,7 @@ decimal : dump ( a n -- ) begin ?dup 0> while swap dup (dump) 16 + swap 1- repeat drop ; \ dump n lines (of 16 bytes each) of memory starting at a \ }}} -0 constant version +1 constant version : welcome ." welcome to Jewelforth, version " version u. cr .free ; welcome quit bye -- cgit v1.2.3