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
;;; ========================================
;;; Return stack operations
- WORD p_ltR, '>R',fasm
+ WORD p_gtR, '>R',fasm
;; ( x -- ) ( R: -- x )
;; Move x to the return stack.
pop rax