https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84135
--- Comment #3 from David Malcolm <dmalcolm at gcc dot gnu.org> ---
Segfault reading through a NULL value for ubound here:
6032 ubound = GFC_TYPE_ARRAY_UBOUND (type, dim);
6033 if (as->upper[dim] && !INTEGER_CST_P (ubound))
Program received signal SIGSEGV, Segmentation fault.
0x000000000093befa in gfc_trans_array_cobounds (type=<array_type
0x7ffff1a6d498>, pblock=0x7fffffffdad0, sym=0x2baaea0)
at ../../src/gcc/fortran/trans-array.c:6033
6033 if (as->upper[dim] && !INTEGER_CST_P (ubound))
(gdb) p as
$1 = (gfc_array_spec *) 0x2ba9af0
(gdb) p ubound
$2 = <tree 0x0>
