contrib/gcc/omp-low.c

4005 lower_omp_for_lastprivate (struct omp_for_data *fd, tree *body_p,
4042       gimplify_and_add (t, body_p);
4052   tree t, stmt, ilist, dlist, new_stmt, *body_p, *rhs_p;
4069   body_p = &BIND_EXPR_BODY (new_stmt);
4074   append_to_statement_list (OMP_FOR_PRE_BODY (stmt), body_p);
4075   lower_rec_input_clauses (OMP_FOR_CLAUSES (stmt), body_p, &dlist, ctx);
4086     *rhs_p = get_formal_tmp_var (*rhs_p, body_p);
4090     *rhs_p = get_formal_tmp_var (*rhs_p, body_p);
4094     *rhs_p = get_formal_tmp_var (*rhs_p, body_p);
4099   lower_omp_for_lastprivate (&fd, body_p, &dlist, ctx);
4101   append_to_statement_list (stmt, body_p);
4103   append_to_statement_list (OMP_FOR_BODY (stmt), body_p);
4106   append_to_statement_list (t, body_p);
4109   lower_reduction_clauses (OMP_FOR_CLAUSES (stmt), body_p, ctx);
4110   append_to_statement_list (dlist, body_p);
4112   maybe_catch_exception (body_p);
4117   append_to_statement_list (t, body_p);