char_length_2.f90
625 Bytes
-
re PR fortran/67987 (ICE on declaring and initializing character with negative len) · 98a819ea
2015-10-17 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/67987 * decl.c (char_len_param_value): Unwrap unlong line. If LEN < 0, force it to zero per the Fortran 90, 95, 2003, and 2008 Standards. * resolve.c (gfc_resolve_substring_charlen): Unwrap unlong line. If 'start' is larger than 'end', length of substring is negative, so explicitly set it to zero. (resolve_charlen): Remove -Wsurprising warning. Update comment to reflect that the text is from the F2008 standard. 2015-10-17 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/67987 * gfortran.df/pr67987.f90: New test. * gfortran.dg/char_length_2.f90: Update testcase. From-SVN: r228933
Steven G. Kargl committed