aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorJakub Jelinek <jakub@redhat.com>2006-05-15 11:59:30 +0200
committerJakub Jelinek <jakub@gcc.gnu.org>2006-05-15 11:59:30 +0200
commiteeb1d9e08e920796ba71d81765f5a9fdf54af25e (patch)
treef98104c0cbb328853171038be84319686e79eb83 /gcc
parent5b8fdd1fade31b12b6b33d4598f0e8c14caed3b4 (diff)
downloadgcc-eeb1d9e08e920796ba71d81765f5a9fdf54af25e.zip
gcc-eeb1d9e08e920796ba71d81765f5a9fdf54af25e.tar.gz
gcc-eeb1d9e08e920796ba71d81765f5a9fdf54af25e.tar.bz2
re PR middle-end/27416 (ICE on invalid firstprivate/lastprivate)
PR middle-end/27416 * omp-low.c (build_outer_var_ref): If VAR is reference in orphaned construct, return *VAR. * libgomp.fortran/pr27416-1.f90: New test. From-SVN: r113788
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ChangeLog6
-rw-r--r--gcc/omp-low.c4
2 files changed, 10 insertions, 0 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 80a3571..68ee588 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2006-05-15 Jakub Jelinek <jakub@redhat.com>
+
+ PR middle-end/27416
+ * omp-low.c (build_outer_var_ref): If VAR is reference in orphaned
+ construct, return *VAR.
+
2006-05-14 Kaz Kojima <kkojima@gcc.gnu.org>
PR rtl-optimization/27406
diff --git a/gcc/omp-low.c b/gcc/omp-low.c
index 2de13ec..c6d186b 100644
--- a/gcc/omp-low.c
+++ b/gcc/omp-low.c
@@ -577,6 +577,10 @@ build_outer_var_ref (tree var, omp_context *ctx)
}
else if (ctx->outer)
x = lookup_decl (var, ctx->outer);
+ else if (is_reference (var))
+ /* This can happen with orphaned constructs. If var is reference, it is
+ possible it is shared and as such valid. */
+ x = var;
else
gcc_unreachable ();