projects
/
rrq
/
rrqforth.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
remove IMMEDAITE from quote and literal
[rrq/rrqforth.git]
/
stack.asm
diff --git
a/stack.asm
b/stack.asm
index 32db5aef859f3734a55e32bd854ee68722a27cfd..d26bf7b2c9d137fd2dc9a152653cbd59d33590a3 100644
(file)
--- a/
stack.asm
+++ b/
stack.asm
@@
-119,9
+119,9
@@
p_roll_eq:
push qword [rsp+rax]
next
push qword [rsp+rax]
next
- WORD
w6.2.2300
, 'TUCK',fasm
+ WORD
p_tuck
, 'TUCK',fasm
;; ( x1 x2 -- x2 x1 x2 )
;; ( 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
pop rax
pop rbx
push rax