5 ! Contributed Dominique d'Humieres
12 class(Test
), allocatable
:: test(:)
14 print *, TestReference([Test(99), Test(199)]) ! { dg-error "Data transfer element at .1. cannot have ALLOCATABLE components unless it is processed by a defined input/output procedure" }