execute

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