diff --git a/src/compiler/arm64/call.lisp b/src/compiler/arm64/call.lisp index e3843e1de..8001b1792 100644 --- a/src/compiler/arm64/call.lisp +++ b/src/compiler/arm64/call.lisp @@ -1401,8 +1401,7 @@ ((null tn-ref)) (let ((tn (tn-ref-tn tn-ref)) (ea (@ thread-tn - (load-store-offset - (ash (+ thread-mv-return-values-slot slot) word-shift))))) + (ash (+ thread-mv-return-values-slot slot) word-shift)))) (sc-case tn ((descriptor-reg any-reg) (inst str tn ea))