OSDN Git Service

gcc/fortran:
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / parens_1.f90
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