projects / watForth.git / blobdiff
? search:
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
-        set_local $eax
         call $pop
+        set_local $eax
         call $pop
-        get_local $eax
+        call $rpush
         call $push
+        call $rpop
         call $push
+        get_local $eax
         call $push
         br $next
       end ;; dup2
a web based forth machine written directly in webassembly text. provides a live-coding environment in the browser. this forth is unique in being a real-time event driven system, and providing multiple i/o channels over which the program may communicate with coroutines, threads (or workers), or any of the asychronous web API like fetch, webgl, webaudio, webcrypto, etc. forth is a stack based virtual machine that provides a minimal interpreter, compiler, and assembler in a compact and elegant tower. with asynchronous execution and built-in webapi access, it provides an environment for defining domain-specific languages in an ultra-portable environment, as well as linking in other code from the web