From: Clyne Sullivan <clyne@bitgloo.com>
Date: Tue, 3 Dec 2024 23:03:48 +0000 (-0500)
Subject: execute
X-Git-Url: https://code.bitgloo.com/?a=commitdiff_plain;h=3fe10655e920441f2dcd10cc8101edd54549e8e8;p=clyne%2Fsforth.git

execute
---

diff --git a/core.fth b/core.fth
index 82763e9..170edea 100644
--- a/core.fth
+++ b/core.fth
@@ -72,3 +72,4 @@
 
 : (         begin [char] ) key = until ; immediate
 
+: execute   [ here 3 cells + ] literal ! [ ' _jmp , 0 , ] ;