2009-10-16 Richard Guenther <rguenther@suse.de>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / builtins-2.c

diff --git a/gcc/testsuite/gcc.dg/builtins-2.c b/gcc/testsuite/gcc.dg/builtins-2.c
index ebd054f..b1f31c8 100644 (file)
--- a/gcc/testsuite/gcc.dg/builtins-2.c
+++ b/gcc/testsuite/gcc.dg/builtins-2.c
@@ -8,6 +8,28 @@
 /* { dg-do compile } */
 /* { dg-options "-O2 -ffast-math" } */
 
+extern double atan (double);
+extern float atanf (float);
+extern long double atanl (long double);
+extern double exp (double);
+extern float expf (float);
+extern long double expl (long double);
+extern double fabs (double);
+extern float fabsf (float);
+extern long double fabsl (long double);
+extern double log (double);
+extern float logf (float);
+extern long double logl (long double);
+extern double pow (double, double);
+extern float powf (float, float);
+extern long double powl (long double, long double);
+extern double sqrt (double);
+extern float sqrtf (float);
+extern long double sqrtl (long double);
+extern double tan (double);
+extern float tanf (float);
+extern long double tanl (long double);
+
 double test1(double x)
 {
   return log(exp(x));
@@ -58,6 +80,21 @@ double test10(double x)
   return tan(atan(x));
 }
 
+double test11(double x)
+{
+  return fabs(fabs(x));
+}
+
+double test12(double x)
+{
+  return fabs(atan(x));
+}
+
+double test13(double x)
+{
+  return fabs(pow(2.0,x));
+}
+
 float test1f(float x)
 {
   return logf(expf(x));
@@ -108,6 +145,21 @@ float test10f(float x)
   return tanf(atanf(x));
 }
 
+float test11f(float x)
+{
+  return fabsf(fabsf(x));
+}
+
+float test12f(float x)
+{
+  return fabsf(atanf(x));
+}
+
+float test13f(float x)
+{
+  return fabsf(powf(2.0f,x));
+}
+
 long double test1l(long double x)
 {
   return logl(expl(x));
@@ -158,3 +210,18 @@ long double test10l(long double x)
   return tanl(atanl(x));
 }
 
+long double test11l(long double x)
+{
+  return fabsl(fabsl(x));
+}
+
+long double test12l(long double x)
+{
+  return fabsl(atanl(x));
+}
+
+long double test13l(long double x)
+{
+  return fabsl(powl(2.0l,x));
+}
+