------- Comment #4 from janus at gcc dot gnu dot org  2009-10-16 21:25 -------
(In reply to comment #3)
> In addition to this there are two more test cases failing:

Sorry, these were fake (my local source tree was messed up). The only real
failure is class_allocate_1.f03, from which one can extract a reduced test
case:

 implicit none

 type t1
   integer :: a
 end type

 type, extends(t1) :: t2
   integer :: b
 end type

 class(t1),pointer :: cp
 type(t2) :: x

 allocate(cp, source = x)

end


which gives the same error at -O1 and above:

internal compiler error: in tree_annotate_all_with_location, at gimplify.c:892


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41714

Reply via email to