blob: 2ad4e8dbc17e969d914d6f15def7a5f2e18c7646 [file] [log] [blame]
/* mips*-sde-elf doesn't have 128-bit long doubles. */
/* { dg-do compile { target { ! { mips*-sde-elf mips*-mti-elf mips*-img-elf } } } } */
/* { dg-options "-march=mips64r2 -mabi=n32" } */
typedef float TFtype __attribute__((mode(TF)));
TFtype
__powitf (TFtype x, int m)
{
unsigned int n = m < 0 ? -m : m;
TFtype y = n % 2 ? x : 1;
while (n >>= 1)
{
x = x * x;
if (n % 2)
y = y * x;
}
return m < 0 ? 1/y : y;
}