[flang-commits] [flang] [Flang][OpenMP] Fix compilation error when a line with Fixed Source Form Conditional Compilation Sentinels is a continuation line (PR #70309)

via flang-commits flang-commits at lists.llvm.org
Fri Oct 27 01:49:00 PDT 2023


================
@@ -997,14 +997,12 @@ const char *Prescanner::FixedFormContinuationLine(bool mightNeedSpace) {
   }
   tabInCurrentLine_ = false;
   char col1{*nextLine_};
-  if (InCompilerDirective()) {
----------------
sihuan wrote:

Like luporl said, the following code should be legal, even if there was no sentinel in the initial line.
```fortran
      k01=1+
!$   &1
```
And the new commit reinstates the check for consistency between the continuation line's sentinel and the initial line's.

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


More information about the flang-commits mailing list