On Cygwin, both gcc-4.5.3 and gcc-4.9 snapshot (my build) accept this code
module foo
implicit none
real, pointer :: arr(:,:)
contains
subroutine sub(a,dim)
implicit none
real, pointer, intent(in) :: a(:,:)
integer, intent(in) :: dim
integer :: i,j
do i = -3,dim
do j = -2,dim
print *, 'A(',i,',',j,')',a(i,j)
end do
end do
end subroutine sub
end module foo
program array_test
use foo
implicit none
integer :: ierr,n
print *, 'N : '
read *,n
allocate(arr(-3:n,-2:n),stat=ierr)
if (ierr /= 0) then
print *, '*** FATAL ERROR ***'
print *, 'ARR: Allocation request denied'
stop
end if
arr = 1.
call sub (arr,n)
deallocate(arr,stat=ierr)
if (ierr /= 0) then
print *, '*** FATAL ERROR ***'
print *, 'ARR: Deallocation request denied'
stop
end if
end program array_test
As you see the routine "sub" declare the formal parameter "a" as
real, pointer, intent(in) :: a(:,:)
i.e. it uses INTENT with the pointer variable. Now on a Fortran book I read