]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/testsuite/gcc.c-torture/compile/981007-1.c
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / testsuite / gcc.c-torture / compile / 981007-1.c
diff --git a/gcc/testsuite/gcc.c-torture/compile/981007-1.c b/gcc/testsuite/gcc.c-torture/compile/981007-1.c
deleted file mode 100644 (file)
index d41400b..0000000
+++ /dev/null
@@ -1,21 +0,0 @@
-extern double fabs (double);
-extern double sqrt (double);
-
-typedef struct complexm {
-  double re,im;
-} complex;
-
-static complex
-setCom (double r, double i)
-{
-  complex ct;
-  ct.re=fabs(r)<1E-300?0.0:r;
-  ct.im=fabs(i)<1E-300?0.0:i;
-  return ct;
-}
-
-static complex
-csqrt_crash (double x)
-{
-  return (x>=0) ? setCom(sqrt(x),0) : setCom(0,sqrt(-x));
-}