[Openmcl-cvs-notifications] r10117 - /trunk/source/lib/misc.lisp

[rme at clozure.com]

Author: rme
Date: Fri Jul 18 22:25:22 2008
New Revision: 10117

Log:
x8632 conditionalization for DISASSEMBLE.

Still need to fill in *heap-utilization-vector-type-names* for x8632.

Modified:
    trunk/source/lib/misc.lisp

Modified: trunk/source/lib/misc.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lib/misc.lisp (original)
+++ trunk/source/lib/misc.lisp Fri Jul 18 22:25:22 2008
@@ -693,6 +693,7 @@
   it is not already compiled, the compiler is called to produce something =
to
   disassemble."
   (#+ppc-target ppc-xdisassemble
+   #+x8632-target x8632-xdisassemble
    #+x8664-target x8664-xdisassemble
    (require-type (function-for-disassembly thing) 'compiled-function)))
 =