X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fmips%2Fcall.lisp;h=5e47120f6225ac05e5ab71a47ba862cf86df95cc;hb=c8123594e0119507f2ba57fdf88561e1476c8deb;hp=efba66145a2b6c93f938dc1d5618ea284b8d22f8;hpb=66d6a6d3619a31f0c263a24f9e16ce1cd3f14c9f;p=sbcl.git diff --git a/src/compiler/mips/call.lisp b/src/compiler/mips/call.lisp index efba661..5e47120 100644 --- a/src/compiler/mips/call.lisp +++ b/src/compiler/mips/call.lisp @@ -703,7 +703,7 @@ default-value-8 '((:temporary (:scs (non-descriptor-reg)) temp) (:temporary (:sc control-stack :offset nfp-save-offset) nfp-save))) - (:temporary (:sc interior-reg :offset lip-offset) entry-point) + (:temporary (:sc interior-reg) entry-point) (:generator ,(+ (if named 5 0) (if variable 19 1)