X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86-64%2Fstatic-fn.lisp;h=02ae35b35966efb62baec35876d0a6200aaace3e;hb=97dd06859cae90c8ef9021dafe1beebb78b1547f;hp=e0b76ca1330b703fcf9649a82aa6165eca2f2ebc;hpb=952d16ab5880823c1864eb9105bb269e2e00760d;p=sbcl.git diff --git a/src/compiler/x86-64/static-fn.lisp b/src/compiler/x86-64/static-fn.lisp index e0b76ca..02ae35b 100644 --- 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) - ,num-results))) + ,num-results + ,node))) ,@(moves (result-names) (temp-names))))))) ) ; EVAL-WHEN