arm: Add .type and .size to __gnu_cmse_nonsecure_call [PR115360]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pointer_assign_5.f90
blob1994ffebb7ef47f97e02e9554f828ca1e0445f87
1 ! { dg-do compile }
2 ! PR fortran/37580
4 ! See also the pointer_remapping_* tests.
6 program test
7 implicit none
8 real, pointer :: ptr1(:), ptr2(:)
9 ptr1(1) => ptr2 ! { dg-error "Expected bounds specification" }
10 end program test