[Bug fortran/16943] New: doubly defined function type causes error, even when types are the same

[paulthomas2 at wanadoo dot fr]

!  $ ../bin/gfortran bug8.f90 -o test
! In file bug8.f90:18
!
!        integer :: N
!                   1
!  Error: Symbol 'n' at (1) already has basic type of INTEGER

! other compilers warn rather than give error, if the types are consistent

  program bug8 
    implicit none 
    stop " OK. " 

  contains 

    integer function bugf(M) result (N) 
      integer, intent (in) :: M 
      integer :: N
      N = M 
      return 
    end function bugf
  end program bug8

-- 
           Summary: doubly defined function type causes error, even when
                    types are the same
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: minor
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: paulthomas2 at wanadoo dot fr
                CC: bdavis at gcc dot gnu dot org,gcc-bugs at gcc dot gnu
                    dot org


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