some new words
[rrq/rrqforth.git] / temp.asm
index f85cb3375faff34eaea45ea027fde734c36fa31e..46a1358e85632fd4c6c41a4de1f5f8a9f443b9c2 100644 (file)
--- a/temp.asm
+++ b/temp.asm
@@ -48,4 +48,4 @@ p_objecthole_from_tail:
        dq p_dup, p_gtR                 ; ( -- char* n  addr+8 ) [ n addr+8 ]
        dq p_swap, p_strncpy            ; ( -- ) [ n addr+8 ]
        dq p_Rgt, p_Rgt                 ; ( -- addr+8 n ) [ ]
-       dq p_exit
+       dq p_return