[Bug fortran/40822] [4.5 Regression] Internal compiler error when Fortran intrinsic LEN referenced before explicit declaration

[janus at gcc dot gnu dot org]

------- Comment #5 from janus at gcc dot gnu dot org  2009-07-24 11:00 -------
Subject: Bug 40822

Author: janus
Date: Fri Jul 24 11:00:01 2009
New Revision: 150047

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=150047
Log:
2009-07-24  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40822
        * array.c (gfc_resolve_character_array_constructor): Use new function
        gfc_new_charlen.
        * decl.c (add_init_expr_to_sym,variable_decl,match_char_spec,
        gfc_match_implicit): Ditto.
        * expr.c (gfc_simplify_expr): Ditto.
        * gfortran.h (gfc_new_charlen): New prototype.
        * iresolve.c (check_charlen_present,gfc_resolve_char_achar): Use new
        function gfc_new_charlen.
        * module.c (mio_charlen): Ditto.
        * resolve.c (gfc_resolve_substring_charlen,
        gfc_resolve_character_operator,fixup_charlen,resolve_fl_derived,
        resolve_symbol): Ditto.
        * symbol.c (gfc_new_charlen): New function to create a new gfc_charlen
        structure and add it to a namespace.
        (gfc_copy_formal_args_intr): Make sure ts.cl is present
        for CHARACTER variables.


2009-07-24  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40822
        * gfortran.dg/char_length_16.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/char_length_16.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/array.c
    trunk/gcc/fortran/decl.c
    trunk/gcc/fortran/expr.c
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/iresolve.c
    trunk/gcc/fortran/module.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/symbol.c
    trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40822