Index: /trunk/source/compiler/X86/x862.lisp
===================================================================
--- /trunk/source/compiler/X86/x862.lisp	(revision 15352)
+++ /trunk/source/compiler/X86/x862.lisp	(revision 15353)
@@ -7403,5 +7403,5 @@
              (acode-p (setq form (acode-unwrapped-form form))))
     (let* ((offset (memspec-frame-address-offset ea)))
-      (unless (x862-register-for-frame-offset ea)
+      (unless (x862-register-for-frame-offset offset)
         (let* ((op (acode-operator form))
                (constant nil))