Lines Matching defs:clause
540 gfc_error ("Syntax error in OpenMP detach clause at %C");
692 /* The gang clause accepts two optional arguments, num and static.
1386 gfc_error ("Duplicated %qs clause at %L", name, &old_loc);
1412 "Duplicated memory-order clause: unexpected %s "
1413 "clause at %L");
1420 "Duplicated atomic clause: unexpected %s "
1421 "clause at %L");
1462 gfc_error ("Clause expected at %C after trailing comma");
1591 gfc_error ("Expected COMPILATION or EXECUTION in AT clause "
1683 gfc_error_now ("COLLAPSE clause argument not constant "
1850 gfc_error ("Expected NONE or PRESENT in DEFAULT clause "
1854 "in DEFAULT clause at %C");
1973 "with %<reverse_offload%> clause at %C");
1983 gfc_error ("the %<device%> clause expression must "
2571 gfc_error_now ("ORDERED clause argument not"
2839 gfc_error ("Expected FATAL or WARNING in SEVERITY clause "
3022 gfc_error ("Failed to match clause at %C");
3200 gfc_error ("Invalid clause in module with !$ACC DECLARE at %L",
3277 "%<device%> or %<host%> or %<self%> clause at %L", &here);
3331 gfc_error ("WAIT clause at %L requires a scalar INTEGER expression",
3505 (implicit) one with a 'seq' clause. */
3510 " clause");
3513 /* ..., and no 'nohost' clause. */
3517 " at %C marked with incompatible NOHOST clause");
3582 gfc_error ("!$ACC ROUTINE with GANG, WORKER, or VECTOR clause is not "
3790 gfc_error ("Expected DEPEND, UPDATE, or DESTROY clause at %C");
3798 gfc_error ("DEPEND clause at %L of OMP DEPOBJ construct shall not "
3806 gfc_error ("DEPEND clause at %L of OMP DEPOBJ construct shall have "
3932 gfc_error ("MESSAGE clause at %L requires a scalar default-kind "
3939 gfc_error ("Constant character expression required in MESSAGE clause "
4001 gfc_error ("List specified together with memory order clause in FLUSH "
4521 "mentioned in LINK clause and later in TO clause",
4527 "mentioned in TO clause and later in LINK clause",
4555 "mentioned in LINK clause and later in TO clause",
4561 "mentioned in TO clause and later in LINK clause",
4598 "DEVICE_TYPE clause is ignored", &old_loc);
4853 gfc_error ("expected simd clause at %C");
5246 gfc_omp_requires_add_clause (gfc_omp_requires_kind clause,
5261 && (clause & OMP_REQ_TARGET_MASK)
5262 && !(prog_unit->omp_requires & clause))
5265 gfc_error ("!$OMP REQUIRES clause %qs specified via module %qs use "
5269 gfc_error ("!$OMP REQUIRES clause %qs specified at %L comes after "
5274 /* Overriding atomic_default_mem_order clause value. */
5275 if ((clause & OMP_REQ_ATOMIC_MEM_ORDER_MASK)
5278 != (int) clause)
5291 gfc_error ("!$OMP REQUIRES clause %<atomic_default_mem_order(%s)%> "
5296 gfc_error ("!$OMP REQUIRES clause %<atomic_default_mem_order(%s)%> "
5303 /* Requires via module not at program-unit level and not repeating clause. */
5304 if (prog_unit != gfc_current_ns && !(prog_unit->omp_requires & clause))
5306 if (clause & OMP_REQ_ATOMIC_MEM_ORDER_MASK)
5307 gfc_error ("!$OMP REQUIRES clause %<atomic_default_mem_order(%s)%> "
5308 "specified via module %qs use at %L but same clause is "
5312 gfc_error ("!$OMP REQUIRES clause %qs specified via module %qs use at "
5313 "%L but same clause is not specified for the program unit",
5320 prog_unit->omp_requires |= clause;
5332 const char *clause = NULL;
5361 clause = clauses[0];
5368 clause = clauses[1];
5375 clause = clauses[2];
5382 clause = clauses[3];
5389 clause = clauses[4];
5394 clause = "seq_cst";
5399 clause = "acq_rel";
5404 clause = "relaxed";
5410 "ATOMIC_DEFAULT_MEM_ORDER clause at %C");
5419 gfc_error_now ("Sorry, %qs clause at %L on REQUIRES directive is not "
5420 "yet supported", clause, &old_loc);
5421 if (!gfc_omp_requires_add_clause (requires_clause, clause, &old_loc, NULL))
5429 gfc_error ("Clause expected at %C");
5435 gfc_error ("%qs clause at %L specified more than once", clause, &old_loc);
5440 "ATOMIC_DEFAULT_MEM_ORDER clause at %L", &old_loc);
5464 gfc_error ("Expected INCLUSIVE or EXCLUSIVE clause at %C");
5668 gfc_error ("Unexpected junk after TASKYIELD clause at %C");
5808 /* omp atomic [clause-list]
5809 - atomic-clause: read | write | update
5811 - memory-order-clause: seq_cst | acq_rel | release | acquire | relaxed
5829 gfc_error ("!$OMP ATOMIC at %L with %s clause is incompatible with "
5832 gfc_error ("!$OMP ATOMIC at %L with %s clause is incompatible with "
5835 gfc_error ("!$OMP ATOMIC at %L with %s clause is incompatible with "
5839 gfc_error ("!$OMP ATOMIC at %L with %s clause requires %s clause", &loc,
5877 "RELEASE clause", &loc);
5887 "ACQUIRE clause", &loc);
6021 gfc_error ("Unexpected junk after NOWAIT clause at %C");
6061 resolve_scalar_int_expr (gfc_expr *expr, const char *clause)
6066 gfc_error ("%s clause at %L requires a scalar INTEGER expression",
6067 clause, &expr->where);
6071 resolve_positive_int_expr (gfc_expr *expr, const char *clause)
6073 resolve_scalar_int_expr (expr, clause);
6077 gfc_warning (0, "INTEGER expression of %s clause at %L must be positive",
6078 clause, &expr->where);
6082 resolve_nonnegative_int_expr (gfc_expr *expr, const char *clause)
6084 resolve_scalar_int_expr (expr, clause);
6088 gfc_warning (0, "INTEGER expression of %s clause at %L must be "
6089 "non-negative", clause, &expr->where);
6099 gfc_error ("Cray pointer object %qs of derived type in %s clause at %L",
6102 gfc_error ("Cray pointee object %qs of derived type in %s clause at %L",
6108 gfc_error ("POINTER object %qs of polymorphic type in %s clause at %L",
6113 gfc_error ("Cray pointer object %qs of polymorphic type in %s clause at %L",
6118 gfc_error ("Cray pointee object %qs of polymorphic type in %s clause at %L",
6128 gfc_error ("Assumed size array %qs in %s clause at %L",
6131 gfc_error ("Assumed rank array %qs in %s clause at %L",
6147 gfc_error ("POINTER object %qs in %s clause at %L",
6152 gfc_error ("Cray pointer object %qs in %s clause at %L",
6157 gfc_error ("Cray pointee object %qs in %s clause at %L",
6162 gfc_error ("ALLOCATABLE object %qs in %s clause at %L",
6165 gfc_error ("VALUE object %qs in %s clause at %L",
6295 gfc_error ("ORDERED clause parameter is less than COLLAPSE at %L",
6298 gfc_error ("ORDER clause must not be used together ORDERED at %L",
6305 gfc_error ("IF clause at %L requires a scalar LOGICAL expression",
6316 gfc_error ("IF clause at %L requires a scalar LOGICAL expression",
6320 gfc_error ("IF clause without modifier at %L used together with "
6445 gfc_error ("IF clause modifier %s at %L not appropriate for "
6455 gfc_error ("FINAL clause at %L requires a scalar LOGICAL expression",
6465 gfc_error ("SCHEDULE clause's chunk_size at %L requires "
6470 gfc_warning (0, "INTEGER expression of SCHEDULE clause's chunk_size "
6481 "clause at %L", &code->loc);
6558 gfc_error ("%<inscan%> REDUCTION clause on construct other than DO, SIMD, "
6657 1. There is no duplication of variable in allocate clause.
6658 2. Variable in allocate clause are also present in some
6710 gfc_error ("%qs specified in 'allocate' clause at %L but not "
6711 "in an explicit privatization clause",
6763 gfc_error ("Non-THREADPRIVATE object %qs in COPYIN clause"
6771 gfc_error ("Assumed size array %qs in COPYPRIVATE clause "
6774 gfc_error ("INTENT(IN) POINTER %qs in COPYPRIVATE clause "
6782 gfc_error ("THREADPRIVATE object %qs in SHARED clause at "
6785 gfc_error ("Cray pointee %qs in SHARED clause at %L",
6788 gfc_error ("Associate name %qs in SHARED clause at %L",
6794 gfc_error ("DETACH event handle %qs in SHARED clause at %L",
6809 gfc_error ("%qs in ALIGNED clause must be POINTER, "
6821 gfc_error ("%qs in ALIGNED clause at %L requires a scalar "
6904 gfc_error ("Locator %qs at %L in DEPEND clause of depobj "
6915 gfc_error ("Locator at %L in DEPEND clause of depobj "
6970 gfc_error ("Unexpected substring reference in %s clause "
6979 "reference in %s clause at %L",
6987 gfc_error ("%qs in %s clause at %L is not a proper "
6998 "array section in %s clause at %L",
7005 gfc_error ("%qs in %s clause at %L is not a "
7019 gfc_error ("%qs in %s clause at %L is a "
7039 gfc_error ("Assumed size array %qs in %s clause at %L",
7046 "permitted in map clause at %L", n->sym->name,
7065 "FROM, TOFROM, or ALLOC on MAP clause "
7081 "than TO, or ALLOC on MAP clause at %L",
7097 "clause at %L", &n->where);
7111 gfc_error ("THREADPRIVATE object %qs in %s clause at %L",
7114 gfc_error ("Cray pointee %qs in %s clause at %L",
7122 gfc_error ("Non-dummy object %qs in %s clause at %L",
7127 gfc_error ("ALLOCATABLE object %qs in %s clause at %L",
7132 gfc_error ("POINTER object %qs in %s clause at %L",
7135 gfc_error ("VALUE object %qs in %s clause at %L",
7165 gfc_error ("THREADPRIVATE object %qs in %s clause at %L",
7168 gfc_error ("Cray pointee %qs in %s clause at %L",
7171 gfc_error ("Associate name %qs in %s clause at %L",
7178 gfc_error ("Procedure pointer %qs in %s clause at %L",
7181 gfc_error ("POINTER object %qs in %s clause at %L",
7184 gfc_error ("Cray pointer %qs in %s clause at %L",
7193 gfc_error ("Assumed size array %qs in %s clause at %L",
7196 gfc_error ("Variable %qs in %s clause is used in "
7206 gfc_error ("INTENT(IN) POINTER %qs in %s clause at %L",
7217 gfc_error ("DETACH event handle %qs in %s clause at %L",
7242 "modifier in REDUCTION clause at %L",
7360 gfc_error ("LINEAR clause modifier used on DO or SIMD"
7365 gfc_error ("LINEAR clause specified together with "
7366 "ORDERED clause with argument at %L",
7386 gfc_error ("%qs in LINEAR clause at %L requires "
7403 gfc_error ("%qs in LINEAR clause at %L requires "
7406 "specified in UNIFORM clause",
7420 gfc_error ("ALLOCATABLE object %qs in %s clause at %L",
7426 "%s clause at %L", n->sym->name, name,
7429 gfc_error ("Cray pointer object %qs in %s clause at %L",
7432 gfc_error ("Cray pointee object %qs in %s clause at %L",
7437 gfc_error ("%s clause variable %qs at %L is neither "
7510 gfc_error ("Value of HINT clause at %L shall be a valid "
7520 gfc_error ("DIST_SCHEDULE clause's chunk_size at %L requires "
7560 gfc_error ("MESSAGE clause at %L requires a scalar default-kind "
7578 "or USE_DEVICE_ADDR clause at %L", &code->loc);
7580 gfc_error ("%s must contain at least one MAP clause at %L",
7603 gfc_error ("%<DETACH%> clause at %L must not be used together with "
7604 "%<MERGEABLE%> clause", &omp_clauses->detach->where);
8007 gfc_error ("!$OMP ATOMIC UPDATE at %L with FAIL clause requiries either"
8008 " the COMPARE clause or using the intrinsic MIN/MAX "
8267 gfc_error ("ORDERED clause specified together with %<inscan%> "
8268 "REDUCTION clause at %L", loc);
8270 gfc_error ("SCHEDULE clause specified together with %<inscan%> "
8271 "REDUCTION clause at %L", loc);
8416 /* An openacc context may represent a data clause. Abort if so. */
8603 gfc_error ("%s iteration variable present on clause "
8607 gfc_error ("%s iteration variable present on clause "
8879 const char *clause)
8918 "iteration space at %L", clause, &do_code->loc);
8930 clause, &c->loc);
8940 clause, &code->loc);
8949 clause, &code->loc);
9262 "FROM clause", &code->loc);
9275 gfc_error ("OMP CRITICAL at %L with HINT clause requires a NAME, "
9282 "%<inscan%> REDUCTION clause", &code->loc);
9327 "INITIALIZER clause of !$OMP DECLARE REDUCTION at %L",
9417 "INITIALIZER clause of !$OMP DECLARE REDUCTION "
9427 "clause of !$OMP DECLARE REDUCTION must be OMP_PRIV "
9434 gfc_error ("Missing INITIALIZER clause for !$OMP DECLARE REDUCTION "