[flang-commits] [flang] [flang] Enumeration Type: (PR 4/5) Lowering (PR #193571)

[via flang-commits]

================
@@ -3756,20 +3756,6 @@ IntrinsicProcTable::Implementation::HandleEnumerationNext(
     context.messages().Say("NEXT() requires argument A"_err_en_US);
     return std::nullopt;
   }
-  // TEMPORARY: Reject STAT= until lowering handler lands in PR 4/5
-  if (arguments.size() > 1 && arguments[1]) {
-    context.messages().Say(arguments[1]->sourceLocation(),
-        "NEXT() with STAT= is not yet supported"_err_en_US);
-    return std::nullopt;
-  }
-  // TEMPORARY: Reject non-constant argument until lowering handler in PR 4/5
-  if (const auto *expr{arguments[0]->UnwrapExpr()}) {
-    if (!IsConstantExpr(*expr)) {
-      context.messages().Say(arguments[0]->sourceLocation(),
-          "NEXT() with a non-constant argument is not yet supported"_err_en_US);
-      return std::nullopt;
-    }
-  }
   DynamicType enumerationType{derived};
----------------
MattPD wrote:

Qualifying scalar STAT kinds now work, and kinds with insufficient range receive the expected diagnostic.

https://github.com/llvm/llvm-project/pull/193571