Changeset 8211

Timestamp:

Jan 17, 2008, 1:59:40 PM (17 years ago)

Author:

R. Matthew Emerson

Message:

Avoid word-size operands in trap-unless-list. The fullword code is smaller
and probably faster.

File:

• branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp (modified) (1 diff)

branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp

@@ -444 +444 @@
 (define-x8632-vinsn trap-unless-list (()
                                       ((object :lisp))
-                                      ((tag :u16)))
-  (movw (:%w object) (:%w tag))
-  (andw (:$w x8632::fulltagmask) (:%w tag))
-  (cmpw (:$w x8632::fulltag-cons) (:%w tag))
+                                      ((tag :u8)))
+  (movl (:% object) (:% tag))
+  (andl (:$b x8632::fulltagmask) (:% tag))
+  (cmpl (:$b x8632::fulltag-cons) (:% tag))
   (je.pt :ok)
   (uuo-error-reg-not-list (:%l object))