X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86-64%2Fcall.lisp;h=bd61005774d0d4786fea11a4bf66216e8a49da94;hb=edf8d3701ba59bd9f0c1bd027f3179b98250cfd0;hp=269b8c6c671158f3120a30fe77812b680c723072;hpb=b03bfe32eec0801a591de195c4c31d5e4fbaae32;p=sbcl.git diff --git a/src/compiler/x86-64/call.lisp b/src/compiler/x86-64/call.lisp index 269b8c6..bd61005 100644 --- a/src/compiler/x86-64/call.lisp +++ b/src/compiler/x86-64/call.lisp @@ -285,8 +285,7 @@ (count-okay (gen-label))) (note-this-location vop :unknown-return) ;; Branch off to the MV case. - (inst nop) - (inst jmp-short regs-defaulted) + (inst jmp :c regs-defaulted) ;; Default the register args, and set up the stack as if we ;; entered the MV return point.