Changeset 14999


Ignore:
Timestamp:
Sep 24, 2011, 8:42:09 AM (8 years ago)
Author:
gb
Message:

x8664-vinsns: actually commit the file.
x8632-vinsns: in CJMP vinsn, don't shift temp.

Location:
trunk/source/compiler/X86
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/X86/X8632/x8632-vinsns.lisp

    r14998 r14999  
    42314231  (ja default)
    42324232  (movl (:%l reg) (:%l temp))
    4233   (shrl (:%l temp))
    42344233  (movl (:@ (:^ :jtab) (:%l x8632::fn) (:%l temp)) (:%l temp))
    42354234  (leal (:@ (:%l x8632::fn) (:%l temp)) (:%l rjmp))
  • trunk/source/compiler/X86/X8664/x8664-vinsns.lisp

    r14969 r14999  
    46324632  (movq (:@ (:%q x8664::rbp)) (:%q x8664::rbp)))
    46334633
     4634(define-x8664-vinsn (cjmp :branch) (((reg :lisp))
     4635                                    ((reg :lisp)
     4636                                     (minval :s32const)
     4637                                     (maxval :u32const)
     4638                                     (default :label))
     4639                                    ((temp :s32)
     4640                                    (rjmp :lisp)))
     4641  (testl (:$l x8664::fixnummask) (:%l reg))
     4642  (jne default)
     4643  ((:not (:pred zerop minval))
     4644   (subq (:$l minval) (:%q reg)))
     4645  (cmpq (:$l maxval) (:%q reg))
     4646  (ja default)
     4647  (movl (:%l reg) (:%l temp))
     4648  (shrl (:%l temp))
     4649  (movl (:@ (:^ :jtab) (:%q x8664::fn) (:%q temp)) (:%l temp))
     4650  (leaq (:@ (:%q x8664::fn) (:%q temp)) (:%q rjmp))
     4651  (jmp (:%q rjmp))
     4652  (:uuo-section)
     4653  (:align 2)
     4654  (:long (:apply 1+ (:apply ash maxval (- x8664::fixnumshift))))
     4655  :jtab)
     4656
     4657
     4658
     4659(define-x8664-vinsn jtabentry (()
     4660                               ((label :label)))
     4661  (:uuo-section)
     4662  (:long (:^ label)))
     4663
     4664
     4665 
     4666 
     4667 
     4668 
     4669
    46344670(queue-fixup
    46354671 (fixup-x86-vinsn-templates
Note: See TracChangeset for help on using the changeset viewer.