* gcc.c-torture/execute/980709-1.c: New test.
authorJeffrey A Law <law@cygnus.com>
Thu, 9 Jul 1998 23:19:19 +0000 (23:19 +0000)
committerJeff Law <law@gcc.gnu.org>
Thu, 9 Jul 1998 23:19:19 +0000 (17:19 -0600)
From-SVN: r21046

gcc/testsuite/ChangeLog
gcc/testsuite/gcc.c-torture/execute/980709-1.c [new file with mode: 0644]

index 2c6f594b1ad8753c3c175cac2c7221e5c9040d40..249483d5495608eec515866bd50a20c7c76a8a55 100644 (file)
@@ -11,6 +11,8 @@ Thu Jul  9 22:44:49 1998  Alexandre Oliva   <oliva@dcc.unicamp.br>
 
 Thu Jul  9 00:38:51 1998  Jeffrey A Law  (law@cygnus.com)
 
+       * gcc.c-torture/execute/980709-1.c: New test.
+
        * gcc.dg/980709-1.c: New test.
 
 Tue Jul  7 13:41:27 1998  Richard Henderson  <rth@cygnus.com>
diff --git a/gcc/testsuite/gcc.c-torture/execute/980709-1.c b/gcc/testsuite/gcc.c-torture/execute/980709-1.c
new file mode 100644 (file)
index 0000000..cda8076
--- /dev/null
@@ -0,0 +1,14 @@
+#include <math.h>
+
+main()
+{
+  volatile double a;
+  double c;
+  a = 32.0;
+  c = pow(a, 1.0/3.0);
+  if (c + 0.1 > 3.174802
+      && c - 0.1 < 3.174802)
+    exit (0);
+  else
+    abort ();
+}