From: Franz Sirl <Franz.Sirl-kernel@lauterbach.com>
Date: Tue, 2 Apr 2002 22:01:54 +0000 (+0000)
Subject: 20020402-1.c: New test.
X-Git-Tag: releases/gcc-3.3.0~5946
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=cfe834f307f5231803a4c1f686debd1d99607032;p=thirdparty%2Fgcc.git

20020402-1.c: New test.

	2002-04-02  Franz Sirl  <Franz.Sirl-kernel@lauterbach.com>

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

From-SVN: r51762
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index bce49628b31c..88158257f6b0 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-04-02  Franz Sirl  <Franz.Sirl-kernel@lauterbach.com>
+
+	* gcc.c-torture/execute/20020402-1.c: New test.
+
 2002-04-01  Richard Henderson  <rth@redhat.com>
 
 	* gcc.c-torture/compile/920625-1.x: XFAIL -O1.
diff --git a/gcc/testsuite/gcc.c-torture/execute/20020402-1.c b/gcc/testsuite/gcc.c-torture/execute/20020402-1.c
new file mode 100644
index 000000000000..fe2a6f657b2c
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/20020402-1.c
@@ -0,0 +1,41 @@
+/* derived from PR c/2100 */
+
+extern void abort ();
+extern void exit (int);
+
+#define SMALL_N  2
+#define NUM_ELEM 4
+
+int main(void)
+{
+  int listElem[NUM_ELEM]={30,2,10,5};
+  int listSmall[SMALL_N];
+  int i, j;
+  int posGreatest=-1, greatest=-1;
+
+  for (i=0; i<SMALL_N; i++) { 
+    listSmall[i] = listElem[i];
+    if (listElem[i] > greatest) {
+      posGreatest = i;
+      greatest = listElem[i];
+    }
+  }
+  
+  for (i=SMALL_N; i<NUM_ELEM; i++) { 
+    if (listElem[i] < greatest) {
+      listSmall[posGreatest] = listElem[i];
+      posGreatest = 0;
+      greatest = listSmall[0];
+      for (j=1; j<SMALL_N; j++) 
+	if (listSmall[j] > greatest) {
+	  posGreatest = j;
+	  greatest = listSmall[j];
+	}
+    }
+  }
+
+  if (listSmall[0] != 5 || listSmall[1] != 2)
+    abort ();
+  exit (0);
+}
+