PR c/29467
[official-gcc.git] / gcc / testsuite / gfortran.dg / parens_1.f90
blob91ced3b6da0c110cb5ecac664d11ef057c628ba4
1 ! PR 20894
2 ! { dg-do compile }
3 ! Originally contributed by Joost VandeVondele
4 INTEGER, POINTER :: I,J
5 INTEGER :: K
6 ALLOCATE(I)
7 J=>(I) ! { dg-error "Pointer assignment target is neither TARGET nor POINTER" }
8 END