[Bug fortran/67987] ICE on declaring and initializing character with negative len

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67987

--- Comment #5 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Sat Oct 17 16:50:47 2015
New Revision: 228933

URL: https://gcc.gnu.org/viewcvs?rev=228933&root=gcc&view=rev
Log:
2015-10-17  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-17  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:
    trunk/gcc/testsuite/gfortran.dg/pr67987.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/decl.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/char_length_2.f90