Lines Matching defs:argOk

1752   bool argOk{type->kind() ==
1754   if (!argOk) {
1760   return argOk;
1980     bool argOk{false};
1984       argOk = false;
1987       argOk = !type->IsUnlimitedPolymorphic() &&
1992       argOk = !type->IsUnlimitedPolymorphic() &&
1997       argOk = !type->IsUnlimitedPolymorphic() &&
2002       argOk = !type->IsUnlimitedPolymorphic() &&
2007       argOk = type->kind() == defaults.GetDefaultKind(TypeCategory::Integer);
2010       argOk = type->kind() == defaults.GetDefaultKind(TypeCategory::Real);
2013       argOk = type->kind() == defaults.doublePrecisionKind();
2016       argOk = type->kind() == defaults.GetDefaultKind(TypeCategory::Character);
2019       argOk = type->kind() == defaults.GetDefaultKind(TypeCategory::Logical);
2022       argOk = true;
2028       argOk = true;
2033       argOk = true;
2042       argOk = sameType.IsTkLenCompatibleWith(*type) ||
2049       argOk = type->IsTkCompatibleWith(sameArg->GetType().value());
2063       argOk = true;
2072       argOk = true;
2075       argOk = type->kind() == d.typePattern.kindValue;
2078       argOk = type->kind() >= d.typePattern.kindValue;
2083         argOk = CheckAtomicKind(DEREF(arg), builtinsScope, messages, d.keyword);
2085         argOk = type->IsTkCompatibleWith(sameArg->GetType().value());
2086         if (!argOk) {
2092       if (!argOk) {
2097       argOk = CheckAtomicKind(DEREF(arg), builtinsScope, messages, d.keyword);
2098       if (!argOk) {
2103       argOk = CheckAtomicKind(DEREF(arg), builtinsScope, messages, d.keyword);
2104       if (!argOk) {
2111     if (!argOk) {
2137       bool argOk{false};
2144         argOk = rank == 0 || rank == elementalRank;
2147         argOk = rank == 0;
2150         argOk = rank == 1;
2163               argOk = *shapeArgSize <= common::maxRank;
2167         if (!argOk) {
2180         argOk = rank == 2;
2183         argOk = rank > 0;
2190         argOk = IsCoarray(*arg);
2191         if (!argOk) {
2199         argOk = rank == 0 && (IsCoarray(*arg) || ExtractCoarrayRef(*arg));
2200         if (!argOk) {
2211         argOk = !isAssumedRank && rank == knownArg->Rank();
2216           argOk = true;
2220           argOk = false;
2250         argOk = true;
2267         argOk = true; // Avoid an additional error message
2272         argOk = rank == 0 || rank + 1 == arrayArg->Rank();
2276         argOk = true;
2286       if (!argOk) {