[Bug fortran/78238] [7/8 Regression] [OOP] ICE: verify_gimple failed, with -fdefault-integer-8

[tkoenig at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78238

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |ASSIGNED
           Assignee|unassigned at gcc dot gnu.org      |tkoenig at gcc dot gnu.org

--- Comment #12 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
_hash is an integer(4) in all cases:

$ gfortran -fdefault-integer-8 -fdump-fortran-original a.f90 2>/dev/null  |
grep hash
    (_hash (INTEGER 4) () PRIVATE) 
    (_hash (INTEGER 4) () PRIVATE) 
$ gfortran -fdump-fortran-original a.f90 2>/dev/null  | grep hash
    (_hash (INTEGER 4) () PRIVATE) 
    (_hash (INTEGER 4) () PRIVATE)

Probably the constant has the wrong type.