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 <ja...@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 <ja...@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
