[flang-commits] [flang] [flang] Add support for lowering directives at the CONTAINS level (PR #95123)

[via flang-commits]

================
@@ -1311,18 +1327,43 @@ class PFTDumper {
       const lower::pft::CompilerDirectiveUnit &directive) {
     outputStream << getNodeIndex(directive) << " ";
     outputStream << "CompilerDirective: !";
-    outputStream << directive.get<Fortran::parser::CompilerDirective>()
-                        .source.ToString();
-    outputStream << "\nEnd CompilerDirective\n\n";
+    bool extraNewline =
+        directive.get<parser::CompilerDirective>().source.ToString().back() ==
+        'n';
----------------
jeanPerier wrote:

`'n'` -> `'\n'` ?

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