https://gcc.gnu.org/bugzilla/show_bug.cgi?id=78746
--- Comment #15 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
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
...
