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

From-SVN: r33358

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index c5c35f8..edeb5a3 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,6 +1,10 @@
+Sun Apr 23 14:41:33 2000  Jeffrey A Law  (law@cygnus.com)
+
+       * gcc.c-torture/execute/20000422-1.c: New test.
+
 Thu Apr 20 11:57:03 2000  Jeffrey A Law  (law@cygnus.com)
 
-        * gcc.dg/20000420-1.c: New test.
+        * gcc.c-torture/compile/20000420-1.c: New test.
 
 2000-04-20  Nathan Sidwell  <nathan@codesourcery.com>
 

diff --git a/gcc/testsuite/gcc.c-torture/execute/20000422-1.c b/gcc/testsuite/gcc.c-torture/execute/20000422-1.c
new file mode 100644 (file)
index 0000000..f94d4c5
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/20000422-1.c
@@ -0,0 +1,39 @@
+int ops[13] =
+{
+  11, 12, 46, 3, 2, 2, 3, 2, 1, 3, 2, 1, 2
+};
+
+int correct[13] = 
+{
+  46, 12, 11, 3, 3, 3, 2, 2, 2, 2, 2, 1, 1
+};
+
+int num = 13;
+
+int main()
+{
+  int i;
+
+  for (i = 0; i < num; i++)
+    {
+      int j;
+
+      for (j = num - 1; j > i; j--)
+        {
+          if (ops[j-1] < ops[j])
+            {
+              int op = ops[j];
+              ops[j] = ops[j-1];
+              ops[j-1] = op;
+            }
+        }
+    }
+
+
+  for (i = 0; i < num; i++)
+    if (ops[i] != correct[i])
+      abort ();
+
+  exit (0);
+}
+