http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50923
Richard Guenther <rguenth at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Last reconfirmed| |2011-11-05 Ever Confirmed|0 |1 --- Comment #1 from Richard Guenther <rguenth at gcc dot gnu.org> 2011-11-05 12:11:18 UTC --- The fortran frontend emits f () { } in this the middle-end does not warn because TREE_NO_WARNING is set on the function decl by the frontend: if (result == NULL_TREE) { /* TODO: move to the appropriate place in resolve.c. */ if (warn_return_type && !sym->attr.referenced && sym == sym->result) gfc_warning ("Return value of function '%s' at %L not set", sym->name, &sym->declared_at); TREE_NO_WARNING(sym->backend_decl) = 1;