http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51218
--- Comment #22 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-11-24 20:44:32 UTC --- Author: burnus Date: Thu Nov 24 20:44:28 2011 New Revision: 181699 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=181699 Log: 2011-11-24 Tobias Burnus <bur...@net-b.de> PR fortran/51218 * resolve.c (pure_subroutine): If called subroutine is impure, unset implicit_pure. (resolve_function): Move impure check to simplify code. 2011-11-24 Tobias Burnus <bur...@net-b.de> PR fortran/51218 * gfortran.dg/implicit_pure_1.f90: New. Added: branches/gcc-4_6-branch/gcc/testsuite/gfortran.dg/implicit_pure_1.f90 Modified: branches/gcc-4_6-branch/gcc/fortran/ChangeLog branches/gcc-4_6-branch/gcc/fortran/resolve.c branches/gcc-4_6-branch/gcc/testsuite/ChangeLog