From: davem <davem@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 13 Apr 2002 10:32:46 +0000 (+0000)
Subject: 2002-04-13  David S. Miller  <davem@redhat.com>
X-Git-Tag: upstream/4.9.2~87324
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ad047e8b983584e9c7f92de97446fe71c3034e5e;p=platform%2Fupstream%2Flinaro-gcc.git

2002-04-13  David S. Miller  <davem@redhat.com>

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


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@52272 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 66df3d0..3d0759d 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-04-13  David S. Miller  <davem@redhat.com>
+
+	* gcc.c-torture/execute/20020413-1.c: New test.
+
 2002-04-13  Richard Sandiford  <rsandifo@redhat.com>
 
 	* gcc.dg/asm-6.c,
diff --git a/gcc/testsuite/gcc.c-torture/execute/20020413-1.c b/gcc/testsuite/gcc.c-torture/execute/20020413-1.c
new file mode 100644
index 0000000..fdef9ee
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/20020413-1.c
@@ -0,0 +1,36 @@
+void test(long double val, int *eval)
+{
+  long double tmp = 1.0l;
+  int i = 0;
+
+  if (val < 0.0l)
+    val = -val;
+
+  if (val >= tmp)
+    while (tmp < val)
+      {
+	tmp *= 2.0l;
+	if (i++ >= 10)
+	  abort ();
+      }
+  else if (val != 0.0l)
+    while (val < tmp)
+      {
+	tmp /= 2.0l;
+	if (i++ >= 10)
+	  abort ();
+      }
+
+  *eval = i;
+}
+
+int main(void)
+{
+  int eval;
+
+  test(3.0, &eval);
+  test(3.5, &eval);
+  test(4.0, &eval);
+  test(5.0, &eval);
+  exit (0);
+}