code crash under ifort v18+

   I recently tested my code under the new intel fortran compiler version 18 and above and found that the new compiler crashed my program. The problems is that v18+ ifort crashes pointer passings. Here is a demo code:

program test
  real(8),dimension(:,:) ,pointer::p1
  call sub1(p1)
end program test

subroutine sub1(ptr)
  real(8),pointer,intent(out) :: ptr(:,:)
  print *,'inside sub1'
end subroutine sub1

It ran good under ifort v14, 15,16,17, but got the following error under intel v18+:

          forrtl: severe (174): SIGSEGV, segmentation fault occurred

I don't understand what happened here. Hope some one can help. Thanks!