Changeset 10028


Ignore:
Timestamp:
Jul 14, 2008, 5:55:25 PM (11 years ago)
Author:
gz
Message:

Fix in PPC version of fast-mod-3 (can't use unbox-fixnum because need to treat number as unsigned)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-0/PPC/ppc-hash.lisp

    r9932 r10028  
    4242
    4343(defppclapfunction fast-mod-3 ((number arg_x) (divisor arg_y) (recip arg_z))
    44   (unbox-fixnum imm0 number)
    4544  #+ppc32-target
    4645  (progn
     46    (srwi imm0 number ppc32::fixnumshift)
    4747    (mulhw imm1 imm0 recip)
    4848    (mullw imm0 imm1 divisor))
    4949  #+ppc64-target
    5050  (progn
     51    (srdi imm0 number ppc64::fixnumshift)
    5152    (mulhd imm1 imm0 recip)
    5253    (mulld imm0 imm1 divisor))
Note: See TracChangeset for help on using the changeset viewer.