http://gcc.gnu.org/bugzilla/show_bug.cgi?id=55207
--- Comment #12 from janus at gcc dot gnu.org --- (In reply to Tobias Burnus from comment #11) > > + if ((gfc_current_state () == COMP_MODULE > + || gfc_current_state () == COMP_PROGRAM) > > I haven't tried the patch, but does it work correctly with BLOCK? (It might > well be valid.) Without actually trying it: I would say it should work, since a BLOCK construct would imply COMP_BLOCK here, so that the save attribute is not set ...