Searched refs:gang_num_expr (Results 1 – 9 of 9) sorted by relevance
1437 if (omp_clauses->gang_num_expr || omp_clauses->gang_static_expr) in show_omp_clauses()1440 if (omp_clauses->gang_num_expr) in show_omp_clauses()1443 show_expr (omp_clauses->gang_num_expr); in show_omp_clauses()1445 if (omp_clauses->gang_num_expr && omp_clauses->gang_static) in show_omp_clauses()
3569 if (clauses->gang_num_expr)3571 arg = gfc_convert_expr_to_tree (block, clauses->gang_num_expr);3578 = gfc_get_location (&clauses->gang_num_expr->where);4481 loop_clauses.gang_num_expr = construct_clauses.gang_num_expr; in gfc_trans_oacc_combined_directive()4497 construct_clauses.gang_num_expr = NULL; in gfc_trans_oacc_combined_directive()
97 gfc_free_expr (c->gang_num_expr); in gfc_free_omp_clauses()617 if (cp->gang_num_expr) in match_oacc_clause_gwv()623 if (gfc_match (" %e ", &cp->gang_num_expr) != MATCH_YES) in match_oacc_clause_gwv()5015 if (omp_clauses->gang_num_expr)5016 resolve_positive_int_expr (omp_clauses->gang_num_expr, "GANG");
1367 struct gfc_expr *gang_num_expr; member
1514 if (omp_clauses->gang_num_expr || omp_clauses->gang_static_expr) in show_omp_clauses()1517 if (omp_clauses->gang_num_expr) in show_omp_clauses()1520 show_expr (omp_clauses->gang_num_expr); in show_omp_clauses()1522 if (omp_clauses->gang_num_expr && omp_clauses->gang_static) in show_omp_clauses()
4346 if (clauses->gang_num_expr) in gfc_trans_omp_clauses()4348 arg = gfc_convert_expr_to_tree (block, clauses->gang_num_expr); in gfc_trans_omp_clauses()4355 = gfc_get_location (&clauses->gang_num_expr->where); in gfc_trans_omp_clauses()5458 loop_clauses.gang_num_expr = construct_clauses.gang_num_expr; in gfc_trans_oacc_combined_directive()5474 construct_clauses.gang_num_expr = NULL; in gfc_trans_oacc_combined_directive()
101 gfc_free_expr (c->gang_num_expr); in gfc_free_omp_clauses()711 if (cp->gang_num_expr) in match_oacc_clause_gwv()717 if (gfc_match (" %e ", &cp->gang_num_expr) != MATCH_YES) in match_oacc_clause_gwv()7539 if (omp_clauses->gang_num_expr) in resolve_omp_clauses()7540 resolve_positive_int_expr (omp_clauses->gang_num_expr, "GANG"); in resolve_omp_clauses()
152 * gfortran.h (gfc_omp_clauses): Rename gang_expr as gang_num_expr.154 * openmp.c (gfc_free_omp_clauses): Update to free gang_num_expr and158 (resolve_omp_clauses): Formatting. Also handle gang_num_expr and166 (gfc_trans_oacc_combined_directive): Make use of gang_num_expr and
1551 struct gfc_expr *gang_num_expr; member