From: Jeffrey A Law <law@cygnus.com>
Date: Sun, 29 Aug 1999 21:48:53 +0000 (+0000)
Subject: * gcc.c-torture/execute/990829-1.c: New test.
X-Git-Tag: prereleases/libstdc++-2.92~10946
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=93e0015e796cb222f0e605db7a81302003ed0491;p=thirdparty%2Fgcc.git

* gcc.c-torture/execute/990829-1.c: New test.

From-SVN: r28976
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 720751e034b0..e4163b4f625e 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -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
index 000000000000..82f818645941
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/990829-1.c
@@ -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);
+}