contrib/gcc/omp-low.c

1152 scan_omp_parallel (tree *stmt_p, omp_context *outer_ctx)
1160       && empty_body_p (OMP_PARALLEL_BODY (*stmt_p))
1161       && find_omp_clause (OMP_CLAUSES (*stmt_p), OMP_CLAUSE_COPYIN) == NULL)
1163       *stmt_p = build_empty_stmt ();
1167   ctx = new_omp_context (*stmt_p, outer_ctx);
1177   OMP_PARALLEL_FN (*stmt_p) = ctx->cb.dst_fn;
1179   scan_sharing_clauses (OMP_PARALLEL_CLAUSES (*stmt_p), ctx);
1180   scan_omp (&OMP_PARALLEL_BODY (*stmt_p), ctx);
1195 scan_omp_for (tree *stmt_p, omp_context *outer_ctx)
1200   stmt = *stmt_p;
1215 scan_omp_sections (tree *stmt_p, omp_context *outer_ctx)
1220   stmt = *stmt_p;
1229 scan_omp_single (tree *stmt_p, omp_context *outer_ctx)
1231   tree stmt = *stmt_p;
1410 scan_omp (tree *stmt_p, omp_context *ctx)
1422   walk_stmts (&wi, stmt_p);
2310 maybe_catch_exception (tree *stmt_p)
2328   t = build2 (TRY_CATCH_EXPR, void_type_node, *stmt_p, NULL);
2331   *stmt_p = NULL;
2332   append_to_statement_list (t, stmt_p);
3593 lower_omp_sections (tree *stmt_p, omp_context *ctx)
3600   stmt = *stmt_p;
3675   *stmt_p = new_stmt;
3789 lower_omp_single (tree *stmt_p, omp_context *ctx)
3791   tree t, bind, block, single_stmt = *stmt_p, dlist;
3796   *stmt_p = bind = build3 (BIND_EXPR, void_type_node, NULL, NULL, block);
3831 lower_omp_master (tree *stmt_p, omp_context *ctx)
3833   tree bind, block, stmt = *stmt_p, lab = NULL, x;
3838   *stmt_p = bind = build3 (BIND_EXPR, void_type_node, NULL, NULL, block);
3871 lower_omp_ordered (tree *stmt_p, omp_context *ctx)
3873   tree bind, block, stmt = *stmt_p, x;
3878   *stmt_p = bind = build3 (BIND_EXPR, void_type_node, NULL, NULL, block);
3916 lower_omp_critical (tree *stmt_p, omp_context *ctx)
3918   tree bind, block, stmt = *stmt_p;
3974   *stmt_p = bind = build3 (BIND_EXPR, void_type_node, NULL, NULL, block);
4050 lower_omp_for (tree *stmt_p, omp_context *ctx)
4055   stmt = *stmt_p;
4124   *stmt_p = new_stmt;
4154 lower_omp_parallel (tree *stmt_p, omp_context *ctx)
4160   stmt = *stmt_p;
4231   *stmt_p = bind;
4405 lower_omp (tree *stmt_p, omp_context *ctx)
4415   walk_stmts (&wi, stmt_p);
4475 diagnose_sb_0 (tree *stmt_p, tree branch_ctx, tree label_ctx)
4505   *stmt_p = build_empty_stmt ();