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

    <tr>
        <th>Summary</th>
        <td>
            [flang] Coredump when `-fdefault-integer-8` AND `-fdefault-real-8` are specified
        </td>
    </tr>

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

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

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

<pre>
    Consider the following code
```
implicit none
interface
  subroutine sub(n)
 integer n
  end subroutine

  subroutine sub_ent()
  end subroutine

end interface

call sub_ent()
end program

subroutine sub(xx)
implicit none
integer xx
integer a(xx)
real m, o

return
entry sub_ent()
m = o
return

end subroutine
```

Flang coredumps when both options are specified. If either option is removed, it works fine.


</pre>
<img width="1" height="1" alt="" src="http://email.email.llvm.org/o/eJxsks2upCwQhq8GN6Q7CP4uXPh1x-TbzC1MUEqtGQQDeE6fu5-gZqY7fRIT0Xpe6q0f6T1OBqAh-X8kvydyC7N1zV0aBH27zWCS3qqv5maNRwWOhhnoaLW2n2gmOlgFhLWkYOfDWlxWjQMGaqyJMTQB3CiHeKbUb72zW0AD8Uh4ZQivYyRiEzhqdgyMekJjhnfxTzCB8OrUfyuJ_57zE9YOUus3deRWZycnl4N6s_l4HOR31UXbj8fTh3wSOJCaLoTfqD2udhA2Z_akwX29WVkoEfed_QueBl-Le-o4YW2n5T4NB2pbVk8_ZzC0t2Gmdg1ojafSAfUrDDgiqCv9f6SAYQZ3AhQ9dbDYD1DRKwb6ad1vT0c0cD1yJKoRqha1TKBJy5yXBS-ESOam7KtesbKosr4vqmFgqSrHTBS5kLLMWZ5gwxnPWZmWaSaYENexLOqsTLMsrXk-1DXJGCwS9VXrj-Vq3ZSg9xs0aVYLniZa9qD9vqKcj7FUIlq3mYALEM7j3romSi_9NnmSMY0--H-XBQx63_BDm9_p7ezU0ShSsMuoYJSbDpdziJeKFIy2P-6v0TjOI_TS0GRzuplDWD0RLeEd4d2EYd7662AXwrto5XxdVmd_wRAI7_YiPeHdWedHw_8EAAD__ymtI6s">