gcc/testsuite/gfortran.dg/alloc_comp_basics_6.f90

   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
  12 end