module ice_module
type :: B_type
class(A_type),pointer :: A_comp ! A_type is not yet defined
end type B_type
type :: A_type
contains
procedure :: A_proc
end type A_type
contains
subroutine A_proc(this)
class(A_type),target,intent(inout) :: this
end subroutine A_proc
subroutine ice_proc(this)
class(A_type) :: this
call this%A_proc()
end subroutine ice_proc
end module ice_module
f951: interner Compiler-Fehler: in gfc_add_component_ref, bei
fortran/class.c:77
Sorry, the error is in german, but you will understand it :)
--
Summary: [OOP] ICE when defining a pointer component before
defining the class and calling a TBP then
Product: gcc
Version: 4.6.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: boschmann at tp1 dot physik dot uni-siegen dot de
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44212
