Projet_SETI_RISC-V/riscv-gnu-toolchain/gcc/libgcc/config/msp430/mpy.c
2023-03-06 14:48:14 +01:00

26 lines
334 B
C

/* Public domain. */
extern int __mulhi3 (int, int);
int
__mulhi3 (int x, int y)
{
char bit;
int neg = 0;
int rv = 0;
if (y < 0)
{
y = - y;
neg = 1;
}
for (bit = 0; y && bit < sizeof (y) * 8; bit ++)
{
if (y & 1)
rv += x;
x <<= 1;
y >>= 1;
}
return neg ? - rv : rv;
}