1! { dg-do compile } 2! 3! PR 58026: Bad error recovery for allocatable component of undeclared type 4! 5! Contributed by Joost VandeVondele <Joost.VandeVondele@mat.ethz.ch> 6 7 type sysmtx_t 8 type(ext_complex_t), allocatable :: S(:) ! { dg-error "has not been declared" } 9 class(some_type), allocatable :: X ! { dg-error "has not been declared" } 10 end type 11 12end 13