From fc7b2467cc920eb3fdbf48b323bf0d7d0e9255b1 Mon Sep 17 00:00:00 2001
From: Ralph Ronnquist <ralph.ronnquist@gmail.com>
Date: Fri, 28 May 2021 14:05:46 +1000
Subject: [PATCH] bug fix

---
 rrqforth.asm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/rrqforth.asm b/rrqforth.asm
index 7c1b5ca..fd37709 100644
--- a/rrqforth.asm
+++ b/rrqforth.asm
@@ -126,10 +126,9 @@ previous_word = 0
 	jmp qword rsi
 
 	WORD p_execute,'EXECUTE',fasm
-	;; ( tfa -- )
+	;; ( cfa -- )
 	;; Execute the word
 	pop rax
-	tfa2cfa rax
 	jmp qword [rax]		; goto code of that FORTH word (64 bit jump)
 	
 	WORD p_exit, 'EXIT',fasm
-- 
2.39.2