Index: /trunk/source/level-1/l1-error-system.lisp
===================================================================
--- /trunk/source/level-1/l1-error-system.lisp	(revision 13017)
+++ /trunk/source/level-1/l1-error-system.lisp	(revision 13018)
@@ -140,4 +140,5 @@
        (format s "Write to a strange object ~s at byte offset ~s"
 	       object offset)))
+    #+x86-target
     (when instruction
       (let* ((ds (make-x86-disassembly-state :mode-64 #+x8664-target t