0.9.0.7:

[sbcl.git] / src / assembly / mips / assem-rtns.lisp

diff --git a/src/assembly/mips/assem-rtns.lisp b/src/assembly/mips/assem-rtns.lisp
index c172655..0e3a85c 100644 (file)
--- a/src/assembly/mips/assem-rtns.lisp
+++ b/src/assembly/mips/assem-rtns.lisp
@@ -17,7 +17,7 @@
      ;; These are just needed to facilitate the transfer
      (:temp lip interior-reg lip-offset)
      (:temp count any-reg nl2-offset)
-     (:temp dst any-reg nl4-offset)
+     (:temp dst any-reg nl3-offset)
      (:temp temp descriptor-reg l0-offset)
 
      ;; These are needed so we can get at the register args.