summaryrefslogtreecommitdiff
path: root/flang/lib/Semantics/check-allocate.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'flang/lib/Semantics/check-allocate.cpp')
-rw-r--r--flang/lib/Semantics/check-allocate.cpp2
1 files changed, 1 insertions, 1 deletions
diff --git a/flang/lib/Semantics/check-allocate.cpp b/flang/lib/Semantics/check-allocate.cpp
index 08053594c12e..823aa4e795e3 100644
--- a/flang/lib/Semantics/check-allocate.cpp
+++ b/flang/lib/Semantics/check-allocate.cpp
@@ -548,7 +548,7 @@ bool AllocationCheckerHelper::RunChecks(SemanticsContext &context) {
}
}
// Shape related checks
- if (ultimate_ && evaluate::IsAssumedRank(*ultimate_)) {
+ if (ultimate_ && IsAssumedRank(*ultimate_)) {
context.Say(name_.source,
"An assumed-rank dummy argument may not appear in an ALLOCATE statement"_err_en_US);
return false;