[Bug fortran/42309] Problem with a pointer array passed to a subroutine

["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  2010-02-05 05:28 -------
Subject: Bug 42309

Author: pault
Date: Fri Feb  5 05:28:37 2010
New Revision: 156512

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=156512
Log:
2010-02-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/42309
        * trans-expr.c (gfc_conv_subref_array_arg): Add new argument
        'formal_ptr'. If this is true, give returned descriptor unity
        lbounds, in all dimensions, and the appropriate offset.
        (gfc_conv_procedure_call); If formal is a pointer, set the last
        argument of gfc_conv_subref_array_arg to true.
        * trans.h : Add last argument for gfc_conv_subref_array_arg.
        * trans-io.c (set_internal_unit, gfc_trans_transfer): Set the
        new arg of gfc_conv_subref_array_arg to false.
        * trans-stmt.c (forall_make_variable_temp): The same.

2010-02-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/42309
        * gfortran.dg/subref_array_pointer_4.f90 : New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/subref_array_pointer_4.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/fortran/trans-io.c
    trunk/gcc/fortran/trans-stmt.c
    trunk/gcc/fortran/trans.h
    trunk/gcc/testsuite/ChangeLog


-- 


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