------- Additional Comments From fxcoudert at gcc dot gnu dot org 2005-06-18 18:42 ------- Confirmed, we should not issue such warning. Here is a (slightly) reduced testcase:
MODULE procedures PUBLIC :: test PRIVATE :: test2 INTERFACE test MODULE PROCEDURE test2 END INTERFACE test CONTAINS PURE INTEGER FUNCTION test2 () test2 = 0 END FUNCTION test2 END MODULE procedures MODULE actions USE procedures CONTAINS SUBROUTINE show print *, test () END SUBROUTINE show END MODULE actions PROGRAM module_procedure_1 USE actions CALL show END PROGRAM module_procedure_1 -- What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed| |1 Last reconfirmed|0000-00-00 00:00:00 |2005-06-18 18:42:50 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21961