c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr93686_3.f90
blob5b570407f8f2174e64159e1122f93fd34fbd0173
1 ! { dg-do compile }
2 ! PR fortran/93686
4 program p
5 type t
6 end type
7 type(t), pointer :: x
8 data x /t()/ ! { dg-error "part-ref with pointer attribute near ... is not rightmost part-ref of data-stmt-object" }
9 end