[Bug fortran/78746] charlen_03, charlen_10 ICE

[kargl at gcc dot gnu.org]

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

--- Comment #16 from kargl at gcc dot gnu.org ---
(In reply to Dominique d'Humieres from comment #15)
> I still get
> 
> % gfcg charlen_10.f90 
> charlen_10.f90:5:39:
> 
>     5 |       character(:), allocatable :: x(y)1  ! { dg-error "must have a
> deferred shape" }
>       |                                       1
> Error: Allocatable component of structure at (1) must have a deferred shape
> =================================================================
> ==64346==ERROR: AddressSanitizer: heap-use-after-free on address
> 0x604000001028 at pc 0x0001003ef71b bp 0x7ffeefbfe4d0 sp 0x7ffeefbfe4c8
> READ of size 8 at 0x604000001028 thread T0
>     #0 0x1003ef71a in gfc_resolve_expr(gfc_expr*) resolve.c:6839
>     #1 0x10001556f in resolve_array_bound(gfc_expr*, int) array.c:346
>     #2 0x10001c067 in gfc_resolve_array_spec(gfc_array_spec*, int)
> array.c:387
>     #3 0x1003e3709 in resolve_component(gfc_component*, gfc_symbol*)
> resolve.c:14148
> ...

So what?  An error message has been emitted and gfortran is exiting.