[Bug fortran/36704] Procedure pointer as function result

[janus at gcc dot gnu dot org]

------- Comment #4 from janus at gcc dot gnu dot org  2008-12-02 11:59 -------
Subject: Bug 36704

Author: janus
Date: Tue Dec  2 11:58:16 2008
New Revision: 142351

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=142351
Log:
2008-12-02  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/36704
        PR fortran/38290
        * decl.c (match_result): Result may be a standard variable or a
        procedure pointer.
        * expr.c (gfc_check_pointer_assign): Additional checks for procedure
        pointer assignments.
        * primary.c (gfc_match_rvalue): Bugfix for procedure pointer
        assignments.
        * resolve.c (resolve_function): Check for attr.subroutine.
        * symbol.c (check_conflict): Addtional checks for RESULT statements.
        * trans-types.c (gfc_sym_type,gfc_get_function_type): Support procedure
        pointers as function result.


2008-12-02  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/36704
        PR fortran/38290
        * gfortran.dg/entry_7.f90: Modified.
        * gfortran.dg/proc_ptr_2.f90: Extended.
        * gfortran.dg/proc_ptr_3.f90: Modified.
        * gfortran.dg/proc_ptr_11.f90: New.
        * gfortran.dg/proc_ptr_12.f90: New.
        * gfortran.dg/result_1.f90: New.

Added:
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_11.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_12.f90
    trunk/gcc/testsuite/gfortran.dg/result_1.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/decl.c
    trunk/gcc/fortran/expr.c
    trunk/gcc/fortran/primary.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/symbol.c
    trunk/gcc/fortran/trans-types.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/entry_7.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_2.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_3.f90


-- 


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