http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51605
--- Comment #9 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-12-19 13:17:15 UTC --- Dan: Your program should work (with 4.6.2 - or with 4.7 + my patch) if you either change either the SELECT TYPE label or the subroutine name from "integer_or_logical" to something else. * * * Reduced test case for the ICE: contains subroutine foo BLOCK_NAME: block end block BLOCK_NAME end subroutine foo subroutine BLOCK_NAME() end subroutine BLOCK_NAME subroutine bar() end subroutine bar end