gcc/testsuite/gfortran.dg/allocate_error_3.f90


1
2
3
4
5
6
7
8
9

! { dg-do compile }
!
! PR 49708: [4.5/4.6/4.7 Regression] ICE with allocate and no dimensions
!
! Contributed by <fnordxyz@yahoo.com>

  real, pointer :: x(:)
  allocate(x)            ! { dg-error "Array specification required" }
end