[Openmcl-cvs-notifications] r13365 - /trunk/source/level-0/X86/X8632/x8632-misc.lisp

[gb at clozure.com]

Author: gb
Date: Mon Jan  4 23:05:20 2010
New Revision: 13365

Log:
target::unbound -> target::subtag-unbound.

Modified:
    trunk/source/level-0/X86/X8632/x8632-misc.lisp

Modified: trunk/source/level-0/X86/X8632/x8632-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/level-0/X86/X8632/x8632-misc.lisp (original)
+++ trunk/source/level-0/X86/X8632/x8632-misc.lisp Mon Jan  4 23:05:20 2010
@@ -837,7 +837,7 @@
   (subl (% arg_z) (% imm0))
   (subl (% arg_z) (% imm0))
   (lea (@ x8632::fulltag-cons (% imm0)) (% arg_z))
-  (cmpl ($ x8632::unbound)  (@ x8632::cons.car (% arg_z)))
+  (cmpl ($ x8632::subtag-unbound)  (@ x8632::cons.car (% arg_z)))
   (je @fail)
   (single-value-return)
   @fail