[flang-commits] [flang] [flang] Support for warning and error compiler directives. (PR #151510)

[Peter Klausler via flang-commits]

================
@@ -1847,6 +1847,8 @@ class UnparseVisitor {
             [&](const std::list<CompilerDirective::NameValue> &names) {
               Walk("!DIR$ ", names, " ");
             },
+            [&](const CompilerDirective::Error &) { Word("!DIR$ ERROR"); },
----------------
klausler wrote:

How will you test this?  The directive will emit a fatal error in semantics, and then unpausing won't be run.

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