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

    <tr>
        <th>Summary</th>
        <td>
            [flang] Behavior differs with gfortran/ifort when passing Hollerith to CLASS(*)
        </td>
    </tr>

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

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

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

<pre>
    The following test fails with flang https://github.com/llvm/llvm-test-suite/blob/main/Fortran/gfortran/regression/unlimited_polymorphic_14.f90

It ends with STOP 2 because the Hollerith is passed to the CLASS(*) as a character while gfortran/ifort pass it with another type (which does not seem to be an intrinsic type, maybe it is some type code specific for Hollerith, I did not dig further).

Since this is not a standard feature, I am not sure about the expectation. Nag refuses it with an explicit message that Hollerith cannot be passed to CLASS(*).
</pre>
<img width="1px" height="1px" alt="" src="http://email.email.llvm.org/o/eJyMU8GO3DYM_Rr5QmRgy-OsffBhk8WgAYo2wOYe0BJlM5UlQ5Qz3b8v5Nl2p9hLLjM0RD7yPbyHIjwHolF1n5TWf3ncxVNSWqvuqcI9LzGNPwjDV0pMqZqifRm_LQQueh-vHGbIJBkcshe4cl7AeQwzLDlvotpHpS9KX2bOyz6dTFyVvnj_89-_D2X4g-ycSenL5OOk9GVFDkpfLjHlhKWa3X9lojmRCMfysQfPK2ey37foX9aYtoXN9-Z8ckOt6idVP95-v2SgYF_Pe_7251fQMJHBXQjyQvBb9J5SeWSBDUXIQo7H0-ffH5-fle6VflR6ABRAMAsmNJkSXBf2BHfncSkPCOB824ch5oUS5JeNQOn-urBZwEYSCDGDEK1l2USAATjkxEHYHO1Kf4YVXyYqYCwgcaUbjomWQDYy7NiAi-mNQxn6ApbtAW95BrencoHSw-lelWcOpvBnKdilGUEyBovJgiPMe6IbGK63U_dEgFPc8yEN_b2RyZg5hhP8gTMkcrvQPfPS49lwhpVEcC7rMN_pbTAU5InuZP-_5KfKjq0d2gErGpuHetB999D11TKarq1tb2yv-wYHou7jQ9Prjw4b17tmaCseda3PdVs39dB2XX-yfd83w9T2zWAmh6TONa3I_lSseIpprlhkp7Fvu3NfeZzIy2swDlO_piKNh3WnfRZ1rj1LljeEzNkfabpNdE_wiRb8yTGBZecovdrwnWmuC4VDhZKpN4XeCVLtyY-_mK4txR9kctlRiInSl4PbPwEAAP__TzxUBA">