From 05a3e72669334d15032112c436b94e5e908c0620 Mon Sep 17 00:00:00 2001 From: Camden Dixie O'Brien Date: Thu, 26 Feb 2026 23:22:05 +0000 Subject: [PATCH] Compile SPACE? --- wipforth.wat | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) diff --git a/wipforth.wat b/wipforth.wat index 8499d52..a4b6191 100644 --- a/wipforth.wat +++ b/wipforth.wat @@ -1113,6 +1113,35 @@ ;; OR OR OR \ Or all results together ;; ; + (data (i32.const 0x0600) + "\e4\05\00\00" + "\06SPACE?\00" + "\00\00\00\00" + "\08\02\00\00" ;; DUP + "\18\04\00\00" ;; LIT + "\09\00\00\00" ;; 9 + "\fc\02\00\00" ;; = + "\28\02\00\00" ;; SWAP + "\08\02\00\00" ;; DUP + "\18\04\00\00" ;; LIT + "\0a\00\00\00" ;; 10 + "\fc\02\00\00" ;; = + "\28\02\00\00" ;; SWAP + "\08\02\00\00" ;; DUP + "\18\04\00\00" ;; LIT + "\0d\00\00\00" ;; 13 + "\fc\02\00\00" ;; = + "\28\02\00\00" ;; SWAP + "\18\04\00\00" ;; LIT + "\20\00\00\00" ;; 32 + "\fc\02\00\00" ;; = + "\98\03\00\00" ;; OR + "\98\03\00\00" ;; OR + "\98\03\00\00" ;; OR + "\0c\04\00\00") ;; EXIT + + ;; => 0x68 bytes + ;; : WORD ( -- len ) ;; 0 \ Initial length ;;