Fix tree check failure with reduction localization

	gcc/
	* gimplify.cc (gimplify_omp_workshare): Use OMP_CLAUSES, OMP_BODY
	instead of OMP_TARGET_CLAUSES, OMP_TARGET_BODY.

diff --git a/gcc/ChangeLog.omp b/gcc/ChangeLog.omp
index de0cdc40fbd018f6ead263f97f197df26b1240a9..ac314abcc14399074b791480cc3da6ce1b9f8c29 100644 (file)
--- a/gcc/ChangeLog.omp
+++ b/gcc/ChangeLog.omp
@@ -1,3 +1,8 @@
+2019-09-06  Julian Brown  <julian@codesourcery.com>
+
+       * gimplify.cc (gimplify_omp_workshare): Use OMP_CLAUSES, OMP_BODY
+       instead of OMP_TARGET_CLAUSES, OMP_TARGET_BODY.
+
 2019-09-05  Cesar Philippidis  <cesar@codesourcery.com>
            Julian Brown  <julian@codesourcery.com>
 

diff --git a/gcc/gimplify.cc b/gcc/gimplify.cc
index 585abe0667c2d9f4168715fd475b90204062c9ac..5d0a51438ac20691a829aff5b623ccbc36a465bd 100644 (file)
--- a/gcc/gimplify.cc
+++ b/gcc/gimplify.cc
@@ -14456,8 +14456,7 @@ gimplify_omp_workshare (tree *expr_p, gimple_seq *pre_p)
 
       /* FIXME: Reductions are not supported in kernels regions yet.  */
       if (/*ort == ORT_ACC_KERNELS ||*/ ort == ORT_ACC_PARALLEL)
-        localize_reductions (OMP_TARGET_CLAUSES (*expr_p),
-                            OMP_TARGET_BODY (*expr_p));
+       localize_reductions (OMP_CLAUSES (expr), OMP_BODY (expr));
 
       gimple *g = gimplify_and_return_first (OMP_BODY (expr), &body);
       if (gimple_code (g) == GIMPLE_BIND)