cdo/wipforth
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compile SPACE?

Browse Source
This commit is contained in:
Camden Dixie O'Brien
2026-02-26 23:22:05 +00:00
parent 55bc5060e4
commit 05a3e72669
1 changed files with 29 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
wipforth.wat
View File

@@ -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
;;