mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-07-14 13:10:20 +02:00
*** empty log message ***
This commit is contained in:
parent
880ed584e8
commit
f349065ed9
2 changed files with 3 additions and 1 deletions
|
@ -70,7 +70,8 @@ VM_DEFINE_INSTRUCTION (drop, "drop", 0, 0, 0)
|
|||
|
||||
VM_DEFINE_INSTRUCTION (dup, "dup", 0, 0, 1)
|
||||
{
|
||||
PUSH (*sp);
|
||||
SCM x = *sp;
|
||||
PUSH (x);
|
||||
NEXT;
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue