Hi!
Apparently I forgot to test fortran last time during the
http://gcc.gnu.org/ml/gcc-patches/2017-06/msg00839.html
changes. Fixed thusly, committed to gomp-5_0-branch.
2017-06-29 Jakub Jelinek <ja...@redhat.com>
* trans-openmp.c (gfc_trans_omp_taskgroup): Build OMP_TASKGROUP using
make_node instead of build1_loc.
--- gcc/fortran/trans-openmp.c.jj 2017-05-24 11:47:41.000000000 +0200
+++ gcc/fortran/trans-openmp.c 2017-06-29 11:43:00.620323982 +0200
@@ -4546,8 +4546,12 @@ gfc_trans_omp_task (gfc_code *code)
static tree
gfc_trans_omp_taskgroup (gfc_code *code)
{
- tree stmt = gfc_trans_code (code->block->next);
- return build1_loc (input_location, OMP_TASKGROUP, void_type_node, stmt);
+ tree body = gfc_trans_code (code->block->next);
+ tree stmt = make_node (OMP_TASKGROUP);
+ TREE_TYPE (stmt) = void_type_node;
+ OMP_TASKGROUP_BODY (stmt) = body;
+ OMP_TASKGROUP_CLAUSES (stmt) = NULL_TREE;
+ return stmt;
}
static tree
Jakub
