Changeset 14383

Timestamp:

Nov 1, 2010, 3:33:05 PM (10 years ago)

Author:

rme

Message:

Merge trunk changes through r14382.

Location:

release/1.6/source

Files:

• . (modified) (1 prop)
• compiler/PPC/ppc-disassemble.lisp (modified) (1 diff)

release/1.6/source/compiler/PPC/ppc-disassemble.lisp

@@ -245 +245 @@
   (let* ((labaddr (lap-label-address l)))
    (do-dll-nodes (insn instructions (append-dll-node l instructions))
-     (when (>= (lap-instruction-address insn) labaddr)
-       (return (insert-dll-node-after l (lap-instruction-pred insn)))))))
+     (when (>= (instruction-element-address insn) labaddr)
+       (return (insert-dll-node-after l (instruction-element-pred insn)))))))
 
 (defun ppc-disassemble-cr (val operand-spec)