https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95537
--- Comment #5 from Bill Seurer <seurer at linux dot vnet.ibm.com> --- Still fails: make -k check-gcc-fortran RUNTESTFLAGS=dg.exp=gfortran.dg/pr95090.f90 FAIL: gfortran.dg/pr95090.f90 -O (internal compiler error) FAIL: gfortran.dg/pr95090.f90 -O (test for excess errors) git diff diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index 5af44847f..0ef7b1b0e 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -1677,7 +1677,8 @@ typedef struct gfc_common_head char use_assoc, saved, threadprivate; unsigned char omp_declare_target : 1; unsigned char omp_declare_target_link : 1; - char name[GFC_MAX_SYMBOL_LEN + 1]; + /* Provide sufficient space to hold "symbol.eq.1234567890". */ + char name[GFC_MAX_SYMBOL_LEN + 1 + 14]; struct gfc_symbol *head; const char* binding_label; int is_bind_c;
