[Bug fortran/28890] ICE on write

["pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #5 from pault at gcc dot gnu dot org  2006-09-11 05:03 -------
Subject: Bug 28890

Author: pault
Date: Mon Sep 11 05:02:58 2006
New Revision: 116839

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=116839
Log:
2006-09-11  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/28890
        trans-expr.c (gfc_conv_function_call): Obtain the string length
        of a dummy character(*) function from the symbol if it is not
        already translated.  For a call to a character(*) function, use
        the passed, hidden string length argument, which is available
        from the backend_decl of the formal argument.
        resolve.c (resolve_function): It is an error if a function call
        to a character(*) function is other than a dummy procedure or
        an intrinsic.

2006-09-11  Paul Thomas  <pault@gcc.gnu.org>

        PR libfortran/28890
        gfortran.dg/assumed_charlen_function_5.f90: New test.




Added:
    trunk/gcc/testsuite/gfortran.dg/assumed_charlen_function_5.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/testsuite/ChangeLog


-- 


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