[flang-commits] [flang] [flang] Accept C-style comments in label fields (PR #207012)

[Eugene Epshteyn via flang-commits]

================
@@ -1366,12 +1400,19 @@ const char *Prescanner::FixedFormContinuationLine(bool atNewline) {
   }
   tabInCurrentLine_ = false;
   char col1{*nextLine_};
+  int trailingSpaces{0};
+  for (int i{4}; i > 0 && nextLine_[i] == ' '; --i) {
+    ++trailingSpaces;
+  }
----------------
eugeneepshteyn wrote:

Please check this file. Before this PR the output was 3 and ifx/gfortran/NAG/nvfortran agree:
```
      program p
      integer :: k
      k = 3
* */ 88
      print *, k
      end
```

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