[Bug fortran/54270] [4.8 Regression] spurious warning with -Wunused-function

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54270

--- Comment #2 from Tobias Burnus <burnus at gcc dot gnu.org> 2012-08-15 12:44:02 UTC ---
(In reply to comment #0)
> Considering the following test case:

By the way, if you compile your test case with "-O" you will see that the
compiler has properly optimized away the function "s" after inlining the empty
procedure body of "s" in "t". - Thus, that part of the TREE_PUBLIC() = 0 works.