X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=rrqforth.asm;h=1928fbb80fdb038b125c037b10daccb46d99f357;hb=9b8fcf87eaed58b6dfabcf885f8eef5484643de6;hp=dc377747755b342a8ff8cd1e49f8bb16a165531b;hpb=6feac19e9a7e003a0f47890bf39a9a8324697e4b;p=rrq%2Frrqforth.git

diff --git a/rrqforth.asm b/rrqforth.asm
index dc37774..1928fbb 100644
--- a/rrqforth.asm
+++ b/rrqforth.asm
@@ -73,7 +73,7 @@ dostring:
 	pushpname rax
 	next
 
-	WORD p_calltrace,'calltrace',dovalue
+	WORD p_calltrace,'[calltrace]',dovalue
 	;; Common call point for debugging
 	;; rax = cfa of called word
 	;; rsi = cell* of next forth word