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

    <tr>
        <th>Summary</th>
        <td>
            [flang] Missing diagnostic on incorrect KIND value of intrinsic `ACHAR`
        </td>
    </tr>

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

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

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

<pre>
    Consider the following case:
```
           integer :: k1

           k1 = kind(achar(88, 2))

END
```

2 is not a correct KIND value.
All ifort, gfortran and XLF issue an error message
</pre>
<img width="1" height="1" alt="" src="http://email.email.llvm.org/o/eJxkkc2O3CoQhZ8Gb0rT4seesRcsfNvXSpRkFlllW4ayTZqGEeCO8vYRnZZGSVBJsDinijof5uy2QKRZ9x_rpgaPssekJwyO_Pm8U2iWaH_qcwzZWUpQdoI1eh9_uLCBwUxMjYyP7Jk_io_wflwotFGCKlIjXESV_qG4CGBqgosLlskezY6Jyb7vmTyDZHKodff8_zr9NYfxUYLLEGIBBBNTIlPg08fXCW7oDzoxPo7eg1tjKrXfVh8JA2Cw8O3zDC7ngwADUEoxwZVyxo0aq5Ud1IANafHSSqV4NwzNro1qRbsYtMbIteN9P7yshMtg-6VrOxSN05LLjivRS94qMZyI97ZdUdqXAe1iLGs5XdH5k_e36ymmrbl_QQslBiEajwv5fIch5eoxbEyNa4qhUI1HVkRJV-_TcmyZtdy7XPJ7t-KKv8P8be4m-OJyrqiswy3EXJyBGMCFf-OCuFZeyYXsDLBnPp4_jF_ZM2-O5PVeyluuGOXM5Ly5sh_LycQrk3Od_rie3lL8TqYwOd8Xy0zOj91uWv4KAAD__87OvbA">