http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51218
--- Comment #21 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-11-24 17:57:45 UTC --- Author: burnus Date: Thu Nov 24 17:57:41 2011 New Revision: 181698 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=181698 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: trunk/gcc/testsuite/gfortran.dg/implicit_pure_1.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/resolve.c trunk/gcc/testsuite/ChangeLog