From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 23668 invoked by alias); 10 Aug 2012 15:44:10 -0000 Received: (qmail 23655 invoked by uid 22791); 10 Aug 2012 15:44:09 -0000 X-SWARE-Spam-Status: No, hits=-3.6 required=5.0 tests=ALL_TRUSTED,AWL,BAYES_00 X-Spam-Check-By: sourceware.org Received: from localhost (HELO gcc.gnu.org) (127.0.0.1) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Fri, 10 Aug 2012 15:43:56 +0000 From: "burnus at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug middle-end/54224] New: [4.8 Regression] Bogus -Wunused-function warning with static function Date: Fri, 10 Aug 2012 15:44:00 -0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: new X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: middle-end X-Bugzilla-Keywords: diagnostic X-Bugzilla-Severity: normal X-Bugzilla-Who: burnus at gcc dot gnu.org X-Bugzilla-Status: UNCONFIRMED X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Changed-Fields: Message-ID: X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2012-08/txt/msg00613.txt.bz2 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D54224 Bug #: 54224 Summary: [4.8 Regression] Bogus -Wunused-function warning with static function Classification: Unclassified Product: gcc Version: 4.8.0 Status: UNCONFIRMED Keywords: diagnostic Severity: normal Priority: P3 Component: middle-end AssignedTo: unassigned@gcc.gnu.org ReportedBy: burnus@gcc.gnu.org CC: koen.poppe@cs.kuleuven.be Blocks: 54221 Split off from PR 54221. GCC prints for the following program with -Wunused-function: test.f90:8:0: warning: =E2=80=98hello_integer=E2=80=99 defined but not used= [-Wunused-function] subroutine hello_integer( a ) However, the subroutine *is* used. (Note: "hello_integer" is marked with TREE_PUBLIC(...) =3D 0.) module mod_say_hello private :: hello_integer contains subroutine say_hello() call hello_integer(123) end subroutine say_hello subroutine hello_integer( a ) integer, intent(in) :: a print *, "Hello ", a, "!" end subroutine hello_integer end module mod_say_hello