Compile ,
This commit is contained in:
15
wipforth.wat
15
wipforth.wat
@@ -1522,6 +1522,21 @@
|
||||
|
||||
;; : , HERE @ ! 4 HERE +! ;
|
||||
|
||||
(data (i32.const 0x0a48)
|
||||
"\4c\09\00\00"
|
||||
"\01,\00\00"
|
||||
"\00\00\00\00"
|
||||
"\84\05\00\00" ;; HERE
|
||||
"\cc\03\00\00" ;; @
|
||||
"\c0\03\00\00" ;; !
|
||||
"\18\04\00\00" ;; LIT
|
||||
"\04\00\00\00" ;; 4
|
||||
"\84\05\00\00" ;; HERE
|
||||
"\dc\03\00\00" ;; +!
|
||||
"\0c\04\00\00") ;; EXIT
|
||||
|
||||
;; => 0x2c bytes
|
||||
|
||||
;; : IMMEDIATE? 4+ @ 128 AND 0BRANCH [12] TRUE EXIT FALSE ;
|
||||
|
||||
;; : INTERPRET
|
||||
|
||||
Reference in New Issue
Block a user