* gcc.c-torture/execute/990829-1.c: New test.
authorJeffrey A Law <law@cygnus.com>
Sun, 29 Aug 1999 21:48:53 +0000 (21:48 +0000)
committerJeff Law <law@gcc.gnu.org>
Sun, 29 Aug 1999 21:48:53 +0000 (15:48 -0600)
From-SVN: r28976

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

index 720751e034b0b27b44c8c665178fd489c9780b67..e4163b4f625ec9a98f6e20d9854ab7e2115d3bf7 100644 (file)
@@ -1,5 +1,6 @@
 Sun Aug 29 14:35:41 1999  Jeffrey A Law  (law@cygnus.com)
 
+       * gcc.c-torture/execute/990829-1.c: New test.
        * gcc.c-torture/compile/990829-1.c: New test.
 
 1999-08-27  Paul Burchard  <burchard@pobox.com>
diff --git a/gcc/testsuite/gcc.c-torture/execute/990829-1.c b/gcc/testsuite/gcc.c-torture/execute/990829-1.c
new file mode 100644 (file)
index 0000000..82f8186
--- /dev/null
@@ -0,0 +1,15 @@
+double test (const double le, const double ri)
+{
+       double val = ( ri - le ) / ( ri * ( le + 1.0 ) );
+       return val;
+}
+
+int main ()
+{
+        double retval;
+
+       retval = test(1.0,2.0);
+        if (retval < 0.24 || retval > 0.26)
+         abort ();
+       exit (0);
+}