Changeset 14810

Timestamp:

Jun 3, 2011, 7:04:45 PM (8 years ago)

Author:

rme

Message:

Repair bad indentation from copy-and-paste in x86-print-di-lap.

File:

• trunk/source/compiler/X86/x86-disassemble.lisp (modified) (1 diff)

trunk/source/compiler/X86/x86-disassemble.lisp

@@ -2791 +2791 @@
     (format t "~vt" tab-stop))
   (format t "(~a" (x86-di-mnemonic instruction))
-        (let* ((op0 (x86-di-op0 instruction))
-             (op1 (x86-di-op1 instruction))
-             (op2 (x86-di-op2 instruction)))
-        (when op0
-          (write-x86-lap-operand t op0 ds)
-          (when op1
-            (write-x86-lap-operand t op1 ds)
-            (when op2
-              (write-x86-lap-operand t op2 ds)))))
-      (format t ")~%"))
+  (let* ((op0 (x86-di-op0 instruction))
+         (op1 (x86-di-op1 instruction))
+         (op2 (x86-di-op2 instruction)))
+    (when op0
+      (write-x86-lap-operand t op0 ds)
+      (when op1
+        (write-x86-lap-operand t op1 ds)
+        (when op2
+          (write-x86-lap-operand t op2 ds)))))
+  (format t ")~%"))
 
 (defun x86-print-disassembled-instruction (ds instruction seq function)