------- Comment #12 from jakub at gcc dot gnu dot org  2009-05-14 00:00 -------
Subject: Bug 39865

Author: jakub
Date: Thu May 14 00:00:27 2009
New Revision: 147507

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=147507
Log:
        PR fortran/39865
        * io.c (resolve_tag_format): CHARACTER array in FMT= argument
        isn't an extension.  Reject non-CHARACTER array element of
        assumed shape or pointer or assumed size array.
        * trans-array.c (array_parameter_size): New function.
        (gfc_conv_array_parameter): Add size argument.  Call
        array_parameter_size if it is non-NULL.
        * trans-array.h (gfc_conv_array_parameter): Adjust prototype.
        * trans-expr.c (gfc_conv_function_call, gfc_trans_arrayfunc_assign):
        Adjust callers.
        * trans-intrinsic.c (gfc_conv_intrinsic_loc): Likewise.
        * trans-io.c (gfc_convert_array_to_string): Rewritten.

        * gfortran.dg/pr39865.f90: New test.
        * gfortran.dg/hollerith.f90: Don't expect errors for CHARACTER
        arrays in FMT=.
        * gfortran.dg/hollerith_f95.f90: Likewise.
        * gfortran.dg/hollerith6.f90: New test.
        * gfortran.dg/hollerith7.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/hollerith6.f90
    trunk/gcc/testsuite/gfortran.dg/hollerith7.f90
    trunk/gcc/testsuite/gfortran.dg/pr39865.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/io.c
    trunk/gcc/fortran/trans-array.c
    trunk/gcc/fortran/trans-array.h
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/fortran/trans-intrinsic.c
    trunk/gcc/fortran/trans-io.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/hollerith.f90
    trunk/gcc/testsuite/gfortran.dg/hollerith_f95.f90


-- 


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

Reply via email to