<table border="1" cellspacing="0" cellpadding="8">
    <tr>
        <th>Issue</th>
        <td>
            <a href=https://github.com/llvm/llvm-project/issues/100073>100073</a>
        </td>
    </tr>

    <tr>
        <th>Summary</th>
        <td>
            [Flang] Cannot scan continuation lines with preprocessor marks
        </td>
    </tr>

    <tr>
      <th>Labels</th>
      <td>
            flang
      </td>
    </tr>

    <tr>
      <th>Assignees</th>
      <td>
      </td>
    </tr>

    <tr>
      <th>Reporter</th>
      <td>
          mjklemm
      </td>
    </tr>
</table>

<pre>
    When compiling the following reproducer, Flang emits an error message:

```
> flang-new -c ./reproducer.f90
error: Could not scan ./reproducer.f90
somepath/reproducer.F90:4:18: error: Unmatched ')'
           & param3)
 ^
```

Reproducer:
```Fortran
subroutine sub()
    implicit none
    call something(param1, param2, &
# 4 "somepath/reproducer.F90"
         & param3)
    )
end subroutine sub
```

This used to work before commit 5d15f606da4cb4346465956d935a2842f8e86200 was merged.
</pre>
<img width="1px" height="1px" alt="" src="http://email.email.llvm.org/o/eJx0U9tu9CgMfhpyY82ImBwvcjHb-fMAq13tNQFPQsshAtLRvv0q6WxHf9VGkcFgPvvzQaZkZk80sPoPVl8LueUlxMG9vllyrpiC_nf4ZyEPKrjVWONnyAvBLVgb7rsWaY1Bb4oiwxcYrfQzkDM5gfRAMYYIjlKSMzFxYfzK-P-y4Y__QxW_4La_Pnm6w0nBmeH4BD_f-ofhgcnEBV7CZjX4kCEp6X-0T8HRKvPy-_XYcyYuFROXstvBPlH_9k5mtZAGhi3DfpcHDjw_hg2sMkondoOPW1b_-p7XIf98Zkl85T-GmKP0j2i3KYYtG0-Qtolh9_QAAMat1iiTwQdPz2MlrYWdZ16Mnxl2R3DlXpBjh_uOYfNwjAIqYIg_ZwbxC-fvGB_HD4W8hi-h_5yMvxaTYEukIQe4h_gGE91CpL3HnMlQ67K-NbzRslJTJaqmauq-bnQvaoldhbeOugY5h7tM4CjOpM-FHoTuRS8LGsoWyxZ5i22xDPWtnERLdSWRN2U79UrqpuWcq1pWHXaFGZBjxVsUvK1qbM9c41SJutSq67BXklWcnDT2bO27O4c4FyaljYaSc96KwsqJbDrmB_Ho4D199bWIw_7gNG1zYhW3JuX0hMgm22Pojolh9RVepP_sZRV8Nn6T2QQP1nhKcDd5gfWok6KU9rGS8S0VW7TDkvOa9sbCkeE4m7xs01kFx3DcHT6W0xrDK6nMcDwIJIbjg8P7gP8FAAD__yWUNEE">