Changeset 5600
- Timestamp:
- Dec 6, 2006, 5:48:31 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/ccl/level-0/X86/x86-float.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ccl/level-0/X86/x86-float.lisp
r4955 r5600 95 95 (xorb (%b sfloat) (%b sfloat)) 96 96 (shl ($ (1+ IEEE-single-float-exponent-width)) (% sfloat)) 97 (bsrq (% imm1) (% imm0))97 (bsrq (% sfloat) (% imm0)) 98 98 (xorq ($ (1- target::nbits-in-word)) (% imm0)) 99 99 (box-fixnum imm0 arg_z)
Note:
See TracChangeset
for help on using the changeset viewer.
