blob: 210cfa856593e5b1170b76591ba69673b6692dae [file] [log] [blame]
! Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007
! Imagination Technologies Ltd
!
! Integer modulus routines.
!
!!
!! 32-bit modulus unsigned i/p - passed unsigned 32-bit numbers
!!
.text
.global ___umodsi3
.type ___umodsi3,function
.align 2
___umodsi3:
MOV D0FrT,D1RtP ! Save original return address
CALLR D1RtP,___udivsi3
MOV D1RtP,D0FrT ! Recover return address
MOV D0Re0,D1Ar1 ! Return remainder
MOV PC,D1RtP
.size ___umodsi3,.-___umodsi3
!!
!! 32-bit modulus signed i/p - passed signed 32-bit numbers
!!
.global ___modsi3
.type ___modsi3,function
.align 2
___modsi3:
MOV D0FrT,D1RtP ! Save original return address
MOV A0.2,D1Ar1 ! Save A in A0.2
CALLR D1RtP,___divsi3
MOV D1RtP,D0FrT ! Recover return address
MOV D1Re0,A0.2 ! Recover A
MOV D0Re0,D1Ar1 ! Return remainder
ORS D1Re0,D1Re0,D1Re0 ! Was A negative?
NEG D1Ar1,D1Ar1 ! Negate remainder
MOVMI D0Re0,D1Ar1 ! Return neg remainder
MOV PC, D1RtP
.size ___modsi3,.-___modsi3