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

    <tr>
        <th>Summary</th>
        <td>
            [Flang][OpenMP] crash on invalid atomic capture
        </td>
    </tr>

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

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

    <tr>
      <th>Reporter</th>
      <td>
          k-arrows
      </td>
    </tr>
</table>

<pre>
    Reproducer:
https://godbolt.org/z/ahqjKx3EE
```f90
logical x
complex y, z
!$omp atomic capture
x = y
z = y + x
!$omp end atomic
end
```
</pre>
<img width="1" height="1" alt="" src="http://email.email.llvm.org/o/eJxckcGO2ywQx59mfEGJYAxOfODgfFlfPlWt-gYYsM0WGxdwmuTpK3sjbbUSEnOY38zo91cpuWG2VoK4gLgWas1jiPLXQcUY_qSiC-Yhf9olBrNqG6FsgDZjzkvaSmwB2yGYLvh8DHEAbJ-ArRp_v_9_L9_egDZQ0Y_X1xRo48PgtPLkDrTRYVq8vZMH4H_kufUiA-RhWojKYXKaaLXkNVqgzZ1AeSUPoM3zoyKAl33KJ2Rn8wKBNnY2_24vjCxNXdaqsJKd-AmxFIIXo9Sca3VGRkVtaX9SiIYpilarvkKmqsJJpCioYJwxgSU_8rOmZc37illRaUGBUzsp54_e36bNQuFSWq1kZX0-88Krzvq0-0XsvZoHQNxUR7kBh24dEnDqXcrpc0R22e-htDshriAu3xc7f_sB4kp0VGkkYSZuvinvzBdfxRq9_BKSy-PaHXWYANtty-s7LDG8W50B2_3qBNi-Dr9J_BsAAP__9DelAw">