projects
/
watForth.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
formatting/prettiness
[watForth.git]
/
forth.wat
diff --git
a/forth.wat
b/forth.wat
index
a3a61e5
..
0c4b767
100644
(file)
--- a/
forth.wat
+++ b/
forth.wat
@@
-359,12
+359,14
@@
br $next
end ;; rot
call $pop
br $next
end ;; rot
call $pop
- set_local $eax
call $pop
call $pop
+ set_local $eax
call $pop
call $pop
- get_local $eax
+ call $rpush
call $push
call $push
+ call $rpop
call $push
call $push
+ get_local $eax
call $push
br $next
end ;; dup2
call $push
br $next
end ;; dup2