Changeset 14998 for trunk/source/compiler/X86/X8632/x8632-vinsns.lisp
- Timestamp:
- Sep 24, 2011, 8:36:16 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/source/compiler/X86/X8632/x8632-vinsns.lisp
r14979 r14998 4217 4217 (movl (:@ (:% x8632::ebp)) (:% x8632::ebp))) 4218 4218 4219 (define-x8632-vinsn (cjmp :branch) (((reg :lisp)) 4220 ((reg :lisp) 4221 (minval :s32const) 4222 (maxval :u32const) 4223 (default :label)) 4224 ((temp :s32) 4225 (rjmp :lisp))) 4226 (testl (:$l x8664::fixnummask) (:%l reg)) 4227 (jne default) 4228 ((:not (:pred zerop minval)) 4229 (subl (:$l minval) (:%l reg))) 4230 (cmpl (:$l maxval) (:%l reg)) 4231 (ja default) 4232 (movl (:%l reg) (:%l temp)) 4233 (shrl (:%l temp)) 4234 (movl (:@ (:^ :jtab) (:%l x8632::fn) (:%l temp)) (:%l temp)) 4235 (leal (:@ (:%l x8632::fn) (:%l temp)) (:%l rjmp)) 4236 (jmp (:%l rjmp)) 4237 (:uuo-section) 4238 (:align 2) 4239 (:long (:apply 1+ (:apply ash maxval (- x8632::fixnumshift)))) 4240 :jtab) 4241 4242 (define-x8632-vinsn jtabentry (() 4243 ((label :label))) 4244 (:uuo-section) 4245 (:long (:^ label))) 4246 4219 4247 (queue-fixup 4220 4248 (fixup-x86-vinsn-templates
Note: See TracChangeset
for help on using the changeset viewer.