------- Comment #7 from pault at gcc dot gnu dot org 2006-09-12 04:37 ------- Subject: Bug 28890
Author: pault Date: Tue Sep 12 04:37:09 2006 New Revision: 116871 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=116871 Log: 2006-09-12 Paul Thomas <[EMAIL PROTECTED]> 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-12 Paul Thomas <[EMAIL PROTECTED]> PR libfortran/28890 gfortran.dg/assumed_charlen_function_5.f90: New test. Added: branches/gcc-4_1-branch/gcc/testsuite/gfortran.dg/assumed_charlen_function_5.f90 Modified: branches/gcc-4_1-branch/gcc/fortran/ChangeLog branches/gcc-4_1-branch/gcc/fortran/resolve.c branches/gcc-4_1-branch/gcc/fortran/trans-expr.c branches/gcc-4_1-branch/gcc/testsuite/ChangeLog -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28890