1! { dg-do compile } 2! 3! PR 42888: [4.5 Regression] ICE in fold_convert_loc, at fold-const.c:2670 4! 5! Contributed by Harald Anlauf <anlauf@gmx.de> 6 7 implicit none 8 9 type t 10 integer :: X = -999.0 ! Real initializer! 11 end type t 12 13 type(t), allocatable :: x 14 class(t), allocatable :: y,z 15 16 allocate (x) 17 allocate (y) 18 allocate (t::z) 19 20end 21