aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/openmp.c
diff options
context:
space:
mode:
authorJakub Jelinek <jakub@redhat.com>2006-02-16 22:31:20 +0100
committerJakub Jelinek <jakub@gcc.gnu.org>2006-02-16 22:31:20 +0100
commit2003abbddeed761ee8ce5442a84b4502656433f5 (patch)
tree3ffbcf4a25940bd3469da931d04c1026d9205fc6 /gcc/fortran/openmp.c
parentb47b5e089bca1d5a3ff2d72258bea6b546f855cf (diff)
downloadgcc-2003abbddeed761ee8ce5442a84b4502656433f5.zip
gcc-2003abbddeed761ee8ce5442a84b4502656433f5.tar.gz
gcc-2003abbddeed761ee8ce5442a84b4502656433f5.tar.bz2
re PR middle-end/26316 (loop-invariant miscompiles openmp.c)
* openmp.c (resolve_omp_clauses): Add a dummy case label to workaround PR middle-end/26316. From-SVN: r111152
Diffstat (limited to 'gcc/fortran/openmp.c')
-rw-r--r--gcc/fortran/openmp.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c
index 312d5a1..09ec255 100644
--- a/gcc/fortran/openmp.c
+++ b/gcc/fortran/openmp.c
@@ -865,6 +865,10 @@ resolve_omp_clauses (gfc_code *code)
: list == OMP_LIST_MULT ? "IOR" : "IEOR",
n->sym->name, &code->loc);
break;
+ /* Workaround for PR middle-end/26316, nothing really needs
+ to be done here for OMP_LIST_PRIVATE. */
+ case OMP_LIST_PRIVATE:
+ gcc_assert (code->op != EXEC_NOP);
default:
break;
}