https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67987
--- Comment #6 from kargl at gcc dot gnu.org --- Author: kargl Date: Mon Oct 19 18:15:36 2015 New Revision: 228999 URL: https://gcc.gnu.org/viewcvs?rev=228999&root=gcc&view=rev Log: 2015-10-19 Steven G. Kargl <ka...@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-19 Steven G. Kargl <ka...@gcc.gnu.org> PR fortran/67987 * gfortran.df/pr67987.f90: New test. * gfortran.dg/char_length_2.f90: Update testcase. Added: branches/gcc-5-branch/gcc/testsuite/gfortran.dg/pr67987.f90 Modified: branches/gcc-5-branch/gcc/fortran/ChangeLog branches/gcc-5-branch/gcc/fortran/decl.c branches/gcc-5-branch/gcc/fortran/resolve.c branches/gcc-5-branch/gcc/testsuite/ChangeLog branches/gcc-5-branch/gcc/testsuite/gfortran.dg/char_length_2.f90
