From: Ralph Ronnquist Date: Mon, 24 May 2021 01:46:11 +0000 (+1000) Subject: fix the asm label for TUCK X-Git-Url: https://git.rrq.au/?a=commitdiff_plain;h=c91525c4bc19d001bbea047376549b1cf07ebbc4;p=rrq%2Frrqforth.git fix the asm label for TUCK --- diff --git a/stack.asm b/stack.asm index 32db5ae..d26bf7b 100644 --- a/stack.asm +++ b/stack.asm @@ -119,9 +119,9 @@ p_roll_eq: push qword [rsp+rax] next - WORD w6.2.2300, 'TUCK',fasm + WORD p_tuck, 'TUCK',fasm ;; ( x1 x2 -- x2 x1 x2 ) - ;; insert the top stack value into below second stack value. + ;; copy the top stack value into below second stack value. pop rax pop rbx push rax