Changeset 8211


Ignore:
Timestamp:
Jan 17, 2008, 9:59:40 PM (12 years ago)
Author:
rme
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp

    r7877 r8211  
    444444(define-x8632-vinsn trap-unless-list (()
    445445                                      ((object :lisp))
    446                                       ((tag :u16)))
    447   (movw (:%w object) (:%w tag))
    448   (andw (:$w x8632::fulltagmask) (:%w tag))
    449   (cmpw (:$w x8632::fulltag-cons) (:%w tag))
     446                                      ((tag :u8)))
     447  (movl (:% object) (:% tag))
     448  (andl (:$b x8632::fulltagmask) (:% tag))
     449  (cmpl (:$b x8632::fulltag-cons) (:% tag))
    450450  (je.pt :ok)
    451451  (uuo-error-reg-not-list (:%l object))
Note: See TracChangeset for help on using the changeset viewer.