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

    <tr>
        <th>Summary</th>
        <td>
            [flang] Linker for non-constant accesses to kind arrays (integer_kind, logical_kind, real_kind)
        </td>
    </tr>

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

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

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

<pre>
    When compiling a code like this:

```Fortran
program kinds_issue
 use, intrinsic :: iso_fortran_env, only: integer_kinds
   implicit none
   integer :: k
   k=1
   write (*,'(I0)') integer_kinds(k)
end program
```

Results in an error like this:

```
FIRModule:(.text+0x4e): undefined reference to `_QMiso_fortran_envECinteger_kinds'
flang-new: error: linker command failed with exit code 1 (use -v to see invocation)
```
</pre>
<img width="1px" height="1px" alt="" src="http://email.email.llvm.org/o/eJyEU81u8joQfRpnMwIZx0C8yIKWi1TpdnG7uUtknCGZxrGR7dD27T85obRi80mIeH58Zs7JiY6RWodYs_UTE2J47y0OAxOCrfeFHlPnQ31LFifffNX_d-jA-OFCllwLGoxvECz1CKmjyMod43vGv_83fP4dfEhBuzl7Cb4NeoCeXBOPFOOIcwHGiEw8A7kUyEUykPHKHVD0x_MMcUR3zT3e2a-p5BK2GI4T2A0GgIaLJUMJnHf4k517v1H7e6Fn5X51jz4CJQQmKiZ2TDwzsWWieuFMqOmoHmaKqs-l6Ta6Bm70HhT4LcsbxtGmCORAO8AQfPi7hHN4eHl79c1oMbeJapnwMzHxxD8l5iXKHYyuwTM5bCDgGQM6g5A8sA0__vf6IOQ_zw9UtvOUs9WuXTj8yIDTfvlgyfUY8tsftGvgrMliAx-UOsBPSrMVVlm4MSIsrnlsRARyV290Iu_uOt1ZFU1dNqpUusB6tV2Va8m3a1F0tUKD1VZuRKUkGl5tkBu1KfF0klzIsiyoFlxILldqtS5FKZaSc6XkeiOVUGelVkxyHDTZpbXXYelDW0xWqysleVlYfUIbb76f-N5cH-rcvziNbWSSW4op_iAkSnb6WOYb6z38O4ty9iF7bWG8i0m7BNoYjBFjFiGLCzoE_RWzOr81z1a2viWj7T0OeA9UMQZbdyldJl-IAxOHllI3npbGD0wc8ma3x-IS_DuaxMRhIhqZOExc_wQAAP__waY0Dg">