http://gcc.gnu.org/bugzilla/show_bug.cgi?id=55960
--- Comment #1 from janus at gcc dot gnu.org 2013-01-13 10:32:08 UTC ---
With this variant:
module pdfs
type :: pdf
end type pdf
abstract interface
pure function getdims(this)
import pdf
class(pdf), intent(in) :: this
integer getdims
end function getdims
end interface
contains
pure function getx(this)
class(pdf), intent(in) :: this
real, dimension(getdims(this)) :: getx
end function getx
end module pdfs
I get the correct error message (unfortunately twice):
real, dimension(getdims(this)) :: getx
1
Error: ABSTRACT INTERFACE 'getdims' must not be referenced at (1)
I'm not completely sure if the usage of 'getdims' is valid in comment 0.
