X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=temp.asm;h=46a1358e85632fd4c6c41a4de1f5f8a9f443b9c2;hb=d7958ae7b474ef357864237fc40412139e43b117;hp=f85cb3375faff34eaea45ea027fde734c36fa31e;hpb=a503a4916e00a32ef695a7638a3f6f1c3debe862;p=rrq%2Frrqforth.git diff --git a/temp.asm b/temp.asm index f85cb33..46a1358 100644 --- 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