2011-01-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / cray_pointers_3.f90

! { dg-do compile }
program crayerr
  real dpte1(10)
  pointer (iptr1,dpte1) ! { dg-error "fcray-pointer" }
end program crayerr