diff --git a/assembly/mips/bit-bash.lisp b/assembly/mips/bit-bash.lisp index 24205e4e83be694de38a61bfba6bd48fd8dbbdc9..0dfb823fb55fc29820326100604ea922f4609671 100644 --- a/assembly/mips/bit-bash.lisp +++ b/assembly/mips/bit-bash.lisp @@ -318,7 +318,7 @@ (:temp temp2 descriptor-reg l0-offset) (:temp src-shift descriptor-reg cname-offset) (:temp src-bit-offset descriptor-reg lexenv-offset) - (:temp dst-bit-offset descriptor-reg l0-offset) + (:temp dst-bit-offset descriptor-reg l1-offset) (:temp ntemp1 non-descriptor-reg nl2-offset) (:temp ntemp2 non-descriptor-reg nl3-offset) (:temp ntemp3 non-descriptor-reg nl4-offset))