c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pointer_init_12.f90
blobb2bce01ab577d8bfbad4c31194c9ed5737b537db
1 ! { dg-do compile }
2 ! PR 94347 - this used to cause an ICE.
3 ! Original test case by "Serghei".
4 program main
5 character(10), target :: a
6 character(:), pointer :: p => null()
7 p => a
8 end program main