------- Comment #6 from burnus at gcc dot gnu dot org 2008-06-04 22:45 -------
(In reply to comment #5)
> The test case in comment #0 is fixed by rev. 136372, but when compiling the
> full program [...]
I don't see whether the full program is valid or not. (Well, except of the
interface in the main program, which is *invalid*.) In any case the following
reduced test case produces an ICE. (NAG f95 compiles it.)
internal compiler error: in make_decl_rtl, at varasm.c:1297
module other_fun
implicit none
abstract interface
function abstract_fun(x)
implicit none
integer :: x(:)
character(size(x)) abstract_fun
end function abstract_fun
end interface
contains
subroutine test()
procedure(abstract_fun) foo
call get_funloc(foo)
end subroutine test
subroutine get_funloc(x)
procedure(abstract_fun) x
end subroutine get_funloc
end module other_fun
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36322
