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

    <tr>
        <th>Summary</th>
        <td>
            [flang][frontend] Internal compiler error caused by program fragment
        </td>
    </tr>

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

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

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

<pre>
    The following code causes the following assertion violation.
```fortran
program main
type t
  sequence
  integer :: i = 1       
end type
type (t) :: A
integer :: x
equivalence (A, x)
end

subroutine s()
  type g
 integer::d/1/
  end type
end subroutine
```

```
fatal internal error: CHECK(offset_ + elements * stride <= image_.data_.size() || padWithZero_) failed at /proj/build/llvm/Linux_x86_64/flang/lib/Evaluate/initial-image.cpp(104)
```
</pre>
<img width="1" height="1" alt="" src="http://email.email.llvm.org/o/eJxcU02PpDgM_TXmYjUK5qOKAwe6qtGudo8rrTSXUgBDZSYQOgk11fPrR4Gu6Z5BHOw4fn62X6RzapyZK8ifgUh-W6-aZwdEkJ8jufqrsdXjNGpN_1b9d2UcjNbmu5pH7EzP2MnVsUP_W0Q6x9YrM-NNGS2DFYOooRD7PxjrrZxB1Is1o5UTTlIF178tjB5Ejej4deW5481Rs-eRLUJaQ1qjQkjPmOD-gah57jHkPiCAjh6ofNyvQdR_QNxD1uuqblKHKiGjBjrhHajcAQNhUbu1tWb1amZ0QMc9ilsxHIP5jrvD9kBNAtRsdz6RCuYH0udR7FU-u4P0Um-wdpYa2VoT0PH018vpH6CjGQbH_oJAz8iaJ569Q6AanbeqZ4T0FKajJjnyJe6ll5fYqR-8s0c4nOBwwkX2_yt__cLWXMLxIJXmHqVHoGax5itQ065Kh460vk1Azb9qXu-X-7G4FBlQM2g5jyGqWqDm5Sb1Kj0DNWpWXkn9tDGIu2UBOiYi20f3q9Oor9K-TEsZcZUcCqLyUFIeXau0TbpjNyQFHUQ7cJHLPhGF7ArRZlS0WaQqEpQnicgoTUjk8VGUIh9yLulQisNAkAmepNJxIB4bO0bKuZWrpCiyIo20bFm7d9m_d7Fp3lYh4aldRweZ0Mp59wHhldfbW9kz8nMwrZl9kEp-xr8fC-vMtCjNdt_c_kB6bN_wofXByjFsLVqtrq7eLy6IhxqgZlT-urZxZ6aPsW-cwka482G6oRUXdLZ3c6voZwAAAP__P4csmg">