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

    <tr>
        <th>Summary</th>
        <td>
            [Flang][OpenMP] Compilation error when a line with Fixed Source Form Conditional Compilation Sentinels is a continuation line
        </td>
    </tr>

    <tr>
      <th>Labels</th>
      <td>
            openmp,
            flang:frontend
      </td>
    </tr>

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

    <tr>
      <th>Reporter</th>
      <td>
          ohno-fj
      </td>
    </tr>
</table>

<pre>
    ```
Version of flang-new : 18.0.0(cc627828f5176c6d75a25f1756d387d18539c1fb)
```

If a line with `Fixed Source Form Conditional Compilation Sentinels` is a continuation line, a compilation error occurs

The following are the test program, Flang-new, Gfortran and ifort compilation result.

sngg076g_new2.f:
```fortran
      program main
 k01=
c$   &1
      if (k01/=1) print *,101
      print *,'pass'
 end
```

```
$ flang-new sngg076g_new2.f -fopenmp
error: Could not parse sngg076g_new2.f
./sngg076g_new2.f:2:10: error: expected '('
        k01=
           ^
./sngg076g_new2.f:2:7: in the context: statement function definition
        k01=
 ^
./sngg076g_new2.f:2:7: in the context: declaration construct
 k01=
        ^
./sngg076g_new2.f:2:7: in the context: specification part
        k01=
        ^
./sngg076g_new2.f:1:7: in the context: main program
        program main
        ^
$
```

```
$ gfortran sngg076g_new2.f -fopenmp
$
```

```
$ ifort sngg076g_new2.f -qopenmp
$
```

</pre>
<img width="1px" height="1px" alt="" src="http://email.email.llvm.org/o/eJysVV2v4yYQ_TX4ZXQjGMcfefBD9qau-lC10lZ9rTAeHLYOuICb7b-vsHM3H7t7b3dVFMVigHNg5syMDMEMlqhhxTtWHDI5x6PzjTta96Q_ZJ3r_2lYyS8_fmB8_zv5YJwFp0GP0g5Pls7A8j2IesM3nGGtVIlVjbUuRFWqsq8KiYUWVVH2eV31oi7ynRK6Y7hbIR8Y1v-fNEgYjSU4m3gEVvLWfKQe3rvZK4LW-RM8O9ubaJyVIzy702RGmWbwnmw0lsbASg4mgATlkmVelxMqw-fFfD1E3jsPTqnZh9uL_HYk0G4c3dnYAaQniEeCSCHC5N3g5SlhtS--SJMftfPRSwvS9mDS5I7JU5jHuLklCXYYeFUOf1g640azfP_gmgviaoVlXNjhJM2L_U8uWH5YJ4rhFgAYluL2lNHAsE4bsWX5QTDcweSNjcBwz_BZcHFPcl1iWE0yBIbVZQfZ_pUIPhpxe6OYhwfDk3YT2dO07l1ikUT17OaxB-siTNIHejy27t4wbD93ILJ8L3gC-YRGHydSkXpIT8D6-pDLuHUfXAcrfniLqErwxi7SSFqjjzFZQpSRTmQj6NmqJfg9aWMX0b7C_f2MPalR-lVnytkQ_aziF9TxP7xtImW0USvXJH1825lvsImvsyWRf8q3O8wvpMEjG8Ptt-l0eEng12X6zbhrLfgM9K__Apr1Td7v8p3MqBHlrkQURSWyY1PWHe-QSCtVViVirajrtdBSlHXBCTPTIMdccI58m-9ysSkrJRRXNe-E0N1Osy2nkzTjZhz_Pm2cHzITwkxNWe22VTbKjsawtAjEy00Rl3qAS0KzfK99CpXt00JxyHyTkJ66eQhsy0cTYrhiRxPHpeMsNZMVB1a8-2Ui-_OvrDjc1fG1JJ-PZO96wXc0gq90gWz2Y3OMcQqp4mLLsB1MPM7dRrkTwzbd-fJ5mrz7QCoybBfnBIbt4p9_AwAA__-q-Bn_">