projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.30.14: some SB-CLTL2 docstrings
[sbcl.git]
/
src
/
compiler
/
x86-64
/
static-fn.lisp
diff --git
a/src/compiler/x86-64/static-fn.lisp
b/src/compiler/x86-64/static-fn.lisp
index
e0b76ca
..
02ae35b
100644
(file)
--- a/
src/compiler/x86-64/static-fn.lisp
+++ b/
src/compiler/x86-64/static-fn.lisp
@@
-137,7
+137,8
@@
(default-unknown-values
vop
,(if (zerop num-results) nil 'values)
(default-unknown-values
vop
,(if (zerop num-results) nil 'values)
- ,num-results)))
+ ,num-results
+ ,node)))
,@(moves (result-names) (temp-names)))))))
) ; EVAL-WHEN
,@(moves (result-names) (temp-names)))))))
) ; EVAL-WHEN