[flang-commits] [flang] [flang] Handle continuation line edge case (PR #74751)

[Pete Steinfeld via flang-commits]

https://github.com/psteinfeld requested changes to this pull request.

I'm seeing failing tests with these changes.  Here's the list:
```
Failed Tests (14):
  Flang :: Lower/OpenMP/FIR/unstructured.f90
  Flang :: Lower/OpenMP/unstructured.f90
  Flang :: Lower/array-expression.f90
  Flang :: Lower/assigned-goto.f90
  Flang :: Lower/associate-construct.f90
  Flang :: Lower/block.f90
  Flang :: Lower/computed-goto.f90
  Flang :: Lower/irreducible.f90
  Flang :: Lower/loops.f90
  Flang :: Lower/select-case-statement.f90
  Flang :: Lower/submodule.f90
  Flang :: Lower/transformational-intrinsics.f90
  Flang :: Semantics/allocate09.f90
  Flang :: Semantics/typeinfo01.f90
```
Here's an excerpt from the log file for the first one:
```
Command Output (stderr):
--
RUN: at line 3: bbc /local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90 -fopenmp -emit-fir -hlfir=false -o "-" | /local/home/psteinfeld/main/klausler/build/bin/FileCheck /local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90
+ bbc /local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90 -fopenmp -emit-fir -hlfir=false -o -
+ /local/home/psteinfeld/main/klausler/build/bin/FileCheck /local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90
bbc: could not scan /local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90
/local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90:21:19: error: bad character ('!') in Fortran token
  subroutine ss1(n) ! unstructured code followed by a structured OpenMP construct
                    ^
FileCheck error: '<stdin>' is empty.
FileCheck command line:  /local/home/psteinfeld/main/klausler/build/bin/FileCheck /local/home/psteinfeld/main/klausler/flang/test/Lower/OpenMP/FIR/unstructured.f90
```

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