182 lines
3.1 KiB
C
182 lines
3.1 KiB
C
/* { dg-do run } */
|
|
/* { dg-options "-O2" } */
|
|
|
|
extern double fabs(double);
|
|
extern float fabsf(float);
|
|
extern void abort(void);
|
|
|
|
|
|
double test1(double x)
|
|
{
|
|
return (-x)*(-x);
|
|
}
|
|
|
|
float test1f(float x)
|
|
{
|
|
return (-x)*(-x);
|
|
}
|
|
|
|
double test2(double x)
|
|
{
|
|
return fabs(x)*fabs(x);
|
|
}
|
|
|
|
float test2f(float x)
|
|
{
|
|
return fabsf(x)*fabsf(x);
|
|
}
|
|
|
|
double test3(double x, double y)
|
|
{
|
|
return (x*-y)*(x*-y);
|
|
}
|
|
|
|
float test3f(float x, float y)
|
|
{
|
|
return (x*-y)*(x*-y);
|
|
}
|
|
|
|
double test4(double x, double y)
|
|
{
|
|
return (x/-y)*(x/-y);
|
|
}
|
|
|
|
float test4f(float x, float y)
|
|
{
|
|
return (x/-y)*(x/-y);
|
|
}
|
|
|
|
int main()
|
|
{
|
|
if (test1(1.0) != 1.0)
|
|
abort();
|
|
if (test1(2.0) != 4.0)
|
|
abort();
|
|
if (test1(0.0) != 0.0)
|
|
abort();
|
|
if (test1(-1.0) != 1.0)
|
|
abort();
|
|
if (test1(-2.0) != 4.0)
|
|
abort();
|
|
|
|
if (test1f(1.0f) != 1.0f)
|
|
abort();
|
|
if (test1f(2.0f) != 4.0f)
|
|
abort();
|
|
if (test1f(0.0f) != 0.0f)
|
|
abort();
|
|
if (test1f(-1.0f) != 1.0f)
|
|
abort();
|
|
if (test1f(-2.0f) != 4.0f)
|
|
abort();
|
|
|
|
if (test2(1.0) != 1.0)
|
|
abort();
|
|
if (test2(2.0) != 4.0)
|
|
abort();
|
|
if (test2(0.0) != 0.0)
|
|
abort();
|
|
if (test2(-1.0) != 1.0)
|
|
abort();
|
|
if (test2(-2.0) != 4.0)
|
|
abort();
|
|
|
|
if (test2f(1.0f) != 1.0f)
|
|
abort();
|
|
if (test2f(2.0f) != 4.0f)
|
|
abort();
|
|
if (test2f(0.0f) != 0.0f)
|
|
abort();
|
|
if (test2f(-1.0f) != 1.0f)
|
|
abort();
|
|
if (test2f(-2.0f) != 4.0f)
|
|
abort();
|
|
|
|
if (test3(1.0,1.0) != 1.0)
|
|
abort();
|
|
if (test3(1.0,-1.0) != 1.0)
|
|
abort();
|
|
if (test3(1.0,2.0) != 4.0)
|
|
abort();
|
|
if (test3(1.0,-2.0) != 4.0)
|
|
abort();
|
|
if (test3(2.0,1.0) != 4.0)
|
|
abort();
|
|
if (test3(2.0,-1.0) != 4.0)
|
|
abort();
|
|
if (test3(2.0,2.0) != 16.0)
|
|
abort();
|
|
if (test3(2.0,-2.0) != 16.0)
|
|
abort();
|
|
if (test3(-2.0,1.0) != 4.0)
|
|
abort();
|
|
if (test3(-2.0,-1.0) != 4.0)
|
|
abort();
|
|
if (test3(-2.0,2.0) != 16.0)
|
|
abort();
|
|
if (test3(-2.0,-2.0) != 16.0)
|
|
abort();
|
|
|
|
if (test3f(1.0f,1.0f) != 1.0f)
|
|
abort();
|
|
if (test3f(1.0f,-1.0f) != 1.0f)
|
|
abort();
|
|
if (test3f(1.0f,2.0f) != 4.0f)
|
|
abort();
|
|
if (test3f(1.0f,-2.0f) != 4.0f)
|
|
abort();
|
|
if (test3f(2.0f,1.0f) != 4.0f)
|
|
abort();
|
|
if (test3f(2.0f,-1.0f) != 4.0f)
|
|
abort();
|
|
if (test3f(2.0f,2.0f) != 16.0f)
|
|
abort();
|
|
if (test3f(2.0f,-2.0f) != 16.0f)
|
|
abort();
|
|
if (test3f(-2.0f,1.0f) != 4.0f)
|
|
abort();
|
|
if (test3f(-2.0f,-1.0f) != 4.0f)
|
|
abort();
|
|
if (test3f(-2.0f,2.0f) != 16.0f)
|
|
abort();
|
|
if (test3f(-2.0f,-2.0f) != 16.0f)
|
|
abort();
|
|
|
|
if (test4(1.0,1.0) != 1.0)
|
|
abort();
|
|
if (test4(1.0,-1.0) != 1.0)
|
|
abort();
|
|
if (test4(-1.0,1.0) != 1.0)
|
|
abort();
|
|
if (test4(-1.0,-1.0) != 1.0)
|
|
abort();
|
|
if (test4(6.0,3.0) != 4.0)
|
|
abort();
|
|
if (test4(6.0,-3.0) != 4.0)
|
|
abort();
|
|
if (test4(-6.0,3.0) != 4.0)
|
|
abort();
|
|
if (test4(-6.0,-3.0) != 4.0)
|
|
abort();
|
|
|
|
if (test4f(1.0f,1.0f) != 1.0f)
|
|
abort();
|
|
if (test4f(1.0f,-1.0f) != 1.0f)
|
|
abort();
|
|
if (test4f(-1.0f,1.0f) != 1.0f)
|
|
abort();
|
|
if (test4f(-1.0f,-1.0f) != 1.0f)
|
|
abort();
|
|
if (test4f(6.0f,3.0f) != 4.0f)
|
|
abort();
|
|
if (test4f(6.0f,-3.0f) != 4.0f)
|
|
abort();
|
|
if (test4f(-6.0f,3.0f) != 4.0f)
|
|
abort();
|
|
if (test4f(-6.0f,-3.0f) != 4.0f)
|
|
abort();
|
|
|
|
return 0;
|
|
}
|
|
|