re PR middle-end/26412 (ICE with external arrays using OpenMP)

	PR middle-end/26412
	* gimplify.c (omp_add_variable): Guard variable size decl test with
	DECL_SIZE (decl) check.

	* gcc.dg/gomp/pr26412.c: New test.

From-SVN: r111391

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index b04c5782bbe9a1b422819f5b855739da127c0256..1f81c5b2d301dd2a28f7fdfacb8383519080d7a7 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2006-02-23  Jakub Jelinek  <jakub@redhat.com>
+
+       PR middle-end/26412
+       * gimplify.c (omp_add_variable): Guard variable size decl test with
+       DECL_SIZE (decl) check.
+
 2006-02-23  Richard Guenther  <rguenther@suse.de>
 
        PR middle-end/26439

diff --git a/gcc/gimplify.c b/gcc/gimplify.c
index 82e747f00709d7e6fc97c5deb56c028980262f3e..10373c2d92f8cdbffe3c0bbd19cec587605d8ed9 100644 (file)
--- a/gcc/gimplify.c
+++ b/gcc/gimplify.c
@@ -4267,7 +4267,7 @@ omp_add_variable (struct gimplify_omp_ctx *ctx, tree decl, unsigned int flags)
   /* When adding a variable-sized variable, we have to handle all sorts
      of additional bits of data: the pointer replacement variable, and 
      the parameters of the type.  */
-  if (!TREE_CONSTANT (DECL_SIZE (decl)))
+  if (DECL_SIZE (decl) && !TREE_CONSTANT (DECL_SIZE (decl)))
     {
       /* Add the pointer replacement variable as PRIVATE if the variable
         replacement is private, else FIRSTPRIVATE since we'll need the

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 951bc113265c423097916b6a22e11137b5c6fb79..3d359f123142158fdeb6ed72a48ac2f50c86f084 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2006-02-23  Jakub Jelinek  <jakub@redhat.com>
+
+       PR middle-end/26412
+       * gcc.dg/gomp/pr26412.c: New test.
+
 2006-02-22  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
 
        PR c++/26291

diff --git a/gcc/testsuite/gcc.dg/gomp/pr26412.c b/gcc/testsuite/gcc.dg/gomp/pr26412.c
new file mode 100644 (file)
index 0000000..6baecfe
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/gomp/pr26412.c
@@ -0,0 +1,18 @@
+/* PR middle-end/26412 */
+/* { dg-do compile } */
+
+extern double a[];
+extern int b;
+
+double
+test (void)
+{
+  int i;
+  double c = 0;
+
+#pragma omp parallel for private(i) reduction(+:c)
+  for (i = 0; i < 10000; i++)
+    c += a[b];
+
+  return c;
+}