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

    <tr>
        <th>Summary</th>
        <td>
            [openmp][flang] map offloading commonblock failure
        </td>
    </tr>

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

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

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

<pre>
    Failing test added to `openmp/libomptarget/test/offloading/fortran/failing/target_map_common_block1.f90`. This is rather strange because the following currently works (order of instructions in target is changed).
```
!$omp target map(tofrom:devices) map(tofrom:var1)
  devices(2) = omp_get_device_num() 
  var1 = 20
!$omp end target
```

</pre>
<img width="1px" height="1px" alt="" src="http://email.email.llvm.org/o/eJxskt2KrDoQhZ-mvAkjsfy_8KKHxic4903UUnMmpiSJPcx5-kO0Zw_svUFQqbVWVopPea8XS9RB-Q6IauH_tDFsARHKe6KOsLLr_OqU_vJrMvD01fVKG20XEcgHoaaJJhFYQCV5J7vtgL3RA297UG6hANhHIWDP82xYTdougP3MLjhl49cVF3Wn4bGp_THytrF9DIbHjyydWwmVTMU_q_ZCe-FUWMkJHxMWEgON6vAkwkpiZmP4M9YbD-fIBvMlPtl9eAHYsJvICZ6Ftj64YwyarRfaiuvkGD2uMXICbFOQd5A3qOTruX4xAyx42789m9oBm8Cz4w3y20RPPZIHbH-fPJXLANsrRohfwgajGPK74G1_xAVco4c9NsDmHL48MeJU4h9tyE6vRn-tnUxdPrV5qxLqsqptilyilMnaZWWuaqrnZpBqyLCo81xSlk-YlRVVWZnoDiXmmcQ6a2Rb1mklSQ5VUc1qoLqiHApJm9ImNea5peyWRHt_UFfLoqkTowYy_oXXbJRdIL99g3Iy5rpofBuOxUMhjfbB_0QFHcwJ58tS3qF8v2LKe9yw-KFKXNCczIhI1eEoOZzp1hB2D_kNsAfsFx3WY0hH3iKp5vn9etsd_0tjJPW8gAfszzv8HwAA___bvgCL">