http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45521
janus at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |janus at gcc dot gnu.org
Summary|Fortran 2008: GENERIC |[F08] GENERIC resolution
|resolution with |with ALLOCATABLE/POINTER
|ALLOCATABLE/POINTER and |and PROCEDURE
|PROCEDURE |
--- Comment #2 from janus at gcc dot gnu.org 2012-04-18 19:16:59 UTC ---
(In reply to comment #1)
> *** Bug 51736 has been marked as a duplicate of this bug. ***
carrying over test case:
module a
interface testAlloc
module procedure::testAlloc1
module procedure::testAlloc2
end interface
contains
function testAlloc1(obj)
integer,allocatable,intent(in)::obj(:)
logical testAlloc1
testAlloc1=allocated(obj)
end function
function testAlloc2(obj)
integer,pointer,intent(in)::obj(:)
logical testAlloc2
testAlloc2=associated(obj)
end function
end module
program test
use a
integer,pointer::a1(:)=>null()
integer,allocatable::a2(:)
write(*,*),testAlloc(a1),testAlloc(a2)
end program
With current trunk one gets:
module procedure::testAlloc2
1
Error: Ambiguous interfaces 'testalloc2' and 'testalloc1' in generic interface
'testalloc' at (1)
