summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--gcc/fortran/ChangeLog5
-rw-r--r--gcc/fortran/openmp.c4
2 files changed, 9 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 0755ee76838..3839c3f41b1 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2006-02-16 Jakub Jelinek <jakub@redhat.com>
+
+ * openmp.c (resolve_omp_clauses): Add a dummy case label to workaround
+ PR middle-end/26316.
+
2005-02-16 Paul Thomas <pault@gcc.gnu.org>
PR fortran/24557
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c
index 312d5a1e49a..09ec255974c 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;
}
OpenPOWER on IntegriCloud