[J3] Ambiguous?
Van Snyder
Van.Snyder at jpl.nasa.gov
Mon Aug 6 16:20:53 EDT 2018
According to 12.4.3.4.5p3, third bullet in the list, in the 2008
standard, I believe the interface in the following module should not be
ambiguous. But none of my processors accept it. Is it standard
conforming, or have I not understood 12.4.3.4.5p3?
module Ambiguous_m
implicit NONE
private
public :: Ambiguous
interface Ambiguous
module procedure Ambiguous_A, Ambiguous_P
end interface Ambiguous
contains
subroutine Ambiguous_A ( This )
class(*), intent(in), allocatable, target :: This(:)
end subroutine Ambiguous_A
subroutine Ambiguous_P ( This )
class(*), intent(in), pointer :: This(:)
end subroutine Ambiguous_P
end module Ambiguous_m
I also tried it with REAL instead of CLASS(*) arguments and got the same
complaints.
More information about the J3
mailing list