This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/63674] [F03] procedure pointer and non/pure procedure
- From: "janus at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Sun, 14 Dec 2014 12:05:21 +0000
- Subject: [Bug fortran/63674] [F03] procedure pointer and non/pure procedure
- Auto-submitted: auto-generated
- References: <bug-63674-4 at http dot gcc dot gnu dot org/bugzilla/>
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63674
--- Comment #4 from janus at gcc dot gnu.org ---
Author: janus
Date: Sun Dec 14 12:04:49 2014
New Revision: 218717
URL: https://gcc.gnu.org/viewcvs?rev=218717&root=gcc&view=rev
Log:
2014-12-14 Janus Weil <janus@gcc.gnu.org>
PR fortran/63674
* resolve.c (pure_function): Treat procedure-pointer components.
(check_pure_function): New function.
(resolve_function): Use it.
(pure_subroutine): Return a bool to indicate success and modify
arguments.
(resolve_generic_s0,resolve_specific_s0,resolve_unknown_s): Use return
value of 'pure_subroutine'.
(resolve_ppc_call): Call 'pure_subroutine'.
(resolve_expr_ppc): Call 'check_pure_function'.
2014-12-14 Janus Weil <janus@gcc.gnu.org>
PR fortran/63674
* gfortran.dg/proc_ptr_comp_39.f90: New.
* gfortran.dg/pure_dummy_length_1.f90: Modified error message.
* gfortran.dg/stfunc_6.f90: Ditto.
* gfortran.dg/typebound_operator_4.f90: Ditto.
Added:
trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_39.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/resolve.c
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/pure_dummy_length_1.f90
trunk/gcc/testsuite/gfortran.dg/stfunc_6.f90
trunk/gcc/testsuite/gfortran.dg/typebound_operator_4.f03