Searched refs:gfc_is_coarray (Results 1 – 25 of 25) sorted by relevance
700 if (!gfc_is_coarray (e)) in coarray_check()1565 if (!gfc_is_coarray (atom) && !gfc_is_coindexed (atom)) in gfc_check_atomic()5265 if (gfc_is_coarray (expr)) in is_c_interoperable()6078 if (coarray && !gfc_is_coarray (coarray) && coarray->ts.type == BT_INTEGER) in gfc_check_this_image()
1140 if (!gfc_is_coarray (array_expr)) in gfc_build_final_call()
4785 if (gfc_is_coarray (tail->expr) in gfc_match_deallocate()4792 if (gfc_is_coarray (tail->expr) in gfc_match_deallocate()
3661 bool gfc_is_coarray (gfc_expr *);
1483 (coarray_check): Use gfc_is_coarray.2122 * expr.c (gfc_is_coarray): New function.2123 * gfortran.h (gfc_is_coarray): New prototype.
5782 gfc_is_coarray (gfc_expr *e) in gfc_is_coarray() function5854 if (!gfc_is_coarray (e)) in gfc_get_corank()
2960 if (array && gfc_is_coarray (array)) in gfc_resolve_this_image()
2563 if (codimension && !gfc_is_coarray (actual)) in compare_parameter()
10213 || (!gfc_is_coarray (code->expr1) && in resolve_lock_unlock_event()10227 else if (code->op == EXEC_EVENT_POST && !gfc_is_coarray (code->expr1) in resolve_lock_unlock_event()10231 else if (code->op == EXEC_EVENT_WAIT && !gfc_is_coarray (code->expr1)) in resolve_lock_unlock_event()
2698 * expr.c (gfc_is_coarray): Fix algorithm for BT_CLASS.
383 (gfc_get_full_arrayspec_from_expr, gfc_is_coarray): Break on
6269 is_coarray = gfc_is_coarray (code->expr3); in gfc_trans_allocate()
8394 if (coarray == NULL || !gfc_is_coarray (coarray)) in gfc_simplify_this_image()
2373 && !gfc_is_coarray (expr->value.function.actual->expr)) in trans_this_image()
700 if (!gfc_is_coarray (e)) in coarray_check()1561 if (!gfc_is_coarray (atom) && !gfc_is_coindexed (atom)) in gfc_check_atomic()5246 if (gfc_is_coarray (expr)) in is_c_interoperable()6052 if (coarray && !gfc_is_coarray (coarray) && coarray->ts.type == BT_INTEGER) in gfc_check_this_image()
1067 if (!gfc_is_coarray (array_expr)) in gfc_build_final_call()
4744 if (gfc_is_coarray (tail->expr) in gfc_match_deallocate()4751 if (gfc_is_coarray (tail->expr) in gfc_match_deallocate()
3371 bool gfc_is_coarray (gfc_expr *);
5742 gfc_is_coarray (gfc_expr *e) in gfc_is_coarray() function5814 if (!gfc_is_coarray (e)) in gfc_get_corank()
2926 if (array && gfc_is_coarray (array)) in gfc_resolve_this_image()
2498 if (codimension && !gfc_is_coarray (actual)) in compare_parameter()
10074 || (!gfc_is_coarray (code->expr1) && in resolve_lock_unlock_event()10088 else if (code->op == EXEC_EVENT_POST && !gfc_is_coarray (code->expr1) in resolve_lock_unlock_event()10092 else if (code->op == EXEC_EVENT_WAIT && !gfc_is_coarray (code->expr1)) in resolve_lock_unlock_event()
6233 is_coarray = gfc_is_coarray (code->expr3); in gfc_trans_allocate()
8251 if (coarray == NULL || !gfc_is_coarray (coarray)) in gfc_simplify_this_image()
2365 && !gfc_is_coarray (expr->value.function.actual->expr)) in trans_this_image()