This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/29459] Spurious warning about uninitialized optional arguments
- From: "fxcoudert at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 4 Jul 2007 07:44:30 -0000
- Subject: [Bug fortran/29459] Spurious warning about uninitialized optional arguments
- References: <bug-29459-9647@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #3 from fxcoudert at gcc dot gnu dot org 2007-07-04 07:44 -------
(In reply to comment #2)
> *** Bug 31688 has been marked as a duplicate of this bug. ***
Code from PR31688:
MODULE test
IMPLICIT NONE
CONTAINS
SUBROUTINE overlap(s, lds, pab, force_a)
INTEGER, INTENT(IN) :: lds
REAL, DIMENSION(lds, lds, *), INTENT(INOUT) :: s
REAL, DIMENSION(:), INTENT(IN), OPTIONAL :: pab
REAL, INTENT(OUT) :: force_a
if(.not.present(pab)) return
force_a = pab(1)*s(1,1,1)
END SUBROUTINE
END MODULE test
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29459