c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / deallocate_error_4.f90
blobc12e776dd275739593bada176012df100680b664
1 ! { dg-do compile }
2 ! PR fortran/82994
3 ! Code contributed by Gerhard Steinmetz
4 program p
5 type t
6 end type
7 class(t) :: x ! { dg-error "must be dummy, allocatable or pointer" }
8 allocate (x) ! { dg-error "neither a data pointer nor an allocatable" }
9 deallocate (x) ! { dg-error "not a nonprocedure pointer nor an allocatable" }
10 end