obtained gcc-4.6.4.tar.bz2 from upstream website;upstream

verified gcc-4.6.4.tar.bz2.sig;
imported gcc-4.6.4 source tree from verified upstream tarball.

downloading a git-generated archive based on the 'upstream' tag
should provide you with a source tree that is binary identical
to the one extracted from the above tarball.

if you have obtained the source via the command 'git clone',
however, do note that line-endings of files in your working
directory might differ from line-endings of the respective
files in the upstream repository.

1 files changed, 105 insertions, 0 deletions

diff --git a/libgomp/testsuite/libgomp.c/pr39154.c b/libgomp/testsuite/libgomp.c/pr39154.c
new file mode 100644
index 000000000..5a4c89e13
--- /dev/null
+++ b/libgomp/testsuite/libgomp.c/pr39154.c
@@ -0,0 +1,105 @@
+/* PR middle-end/39154 */
+/* { dg-do compile } */
+/* { dg-options "-O2 -std=gnu99" } */
+
+extern void abort (void);
+
+int n = 20;
+
+int
+main (void)
+{
+  int a[n], b[n][n];
+
+#pragma omp parallel for
+    for (int i = 0; i < n; i++)
+      {
+	a[i] = i + 1;
+#pragma omp parallel for
+	for (int j = 0; j < n; j++)
+	  b[i][j] = a[i];
+      }
+
+  for (int i = 0; i < n; i++)
+    {
+      for (int j = 0; j < n; j++)
+	if (b[i][j] != i + 1)
+	  abort ();
+      if (a[i] != i + 1)
+	abort ();
+    }
+
+#pragma omp parallel for shared (n, a, b)
+    for (int i = 0; i < n; i++)
+      {
+	a[i] = i + 3;
+#pragma omp parallel for
+	for (int j = 0; j < n; j++)
+	  b[i][j] = a[i];
+      }
+
+  for (int i = 0; i < n; i++)
+    {
+      for (int j = 0; j < n; j++)
+	if (b[i][j] != i + 3)
+	  abort ();
+      if (a[i] != i + 3)
+	abort ();
+    }
+
+#pragma omp parallel for
+    for (int i = 0; i < n; i++)
+      {
+	a[i] = i + 5;
+#pragma omp parallel for shared (n, a, b)
+	for (int j = 0; j < n; j++)
+	  b[i][j] = a[i];
+      }
+
+  for (int i = 0; i < n; i++)
+    {
+      for (int j = 0; j < n; j++)
+	if (b[i][j] != i + 5)
+	  abort ();
+      if (a[i] != i + 5)
+	abort ();
+    }
+
+#pragma omp parallel for shared (n, a, b)
+    for (int i = 0; i < n; i++)
+      {
+	a[i] = i + 7;
+#pragma omp parallel for shared (n, a, b)
+	for (int j = 0; j < n; j++)
+	  b[i][j] = a[i];
+      }
+
+  for (int i = 0; i < n; i++)
+    {
+      for (int j = 0; j < n; j++)
+	if (b[i][j] != i + 7)
+	  abort ();
+      if (a[i] != i + 7)
+	abort ();
+    }
+
+#pragma omp parallel for private (a, b)
+    for (int i = 0; i < n; i++)
+      {
+	a[i] = i + 1;
+#pragma omp parallel for
+	for (int j = 0; j < n; j++)
+	  b[i][j] = a[i];
+      }
+
+#pragma omp parallel for private (a, b)
+    for (int i = 0; i < n; i++)
+      {
+	a[i] = i + 1;
+#pragma omp parallel for private (b)
+	for (int j = 0; j < n; j++)
+	  b[i][j] = a[i];
+      }
+
+  return 0;
+}