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

[Eugene Epshteyn via flang-commits]

================
@@ -71,6 +71,15 @@ static inline constexpr bool IsFixedFormCommentChar(char ch) {
   return ch == '!' || ch == '*' || ch == 'C' || ch == 'c';
 }
 
+static bool HasTabInLabelField(const char *col1) {
+  for (int i{0}; i < 6; ++i) {
----------------
eugeneepshteyn wrote:

I don't think 6 columns are guaranteed to be present, so probably need to add `&& col1[i] != '\n'`

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