blob: da4d7c7e5e37bb2a191a5030b3d5018cd6c4dd0d [file] [log] [blame]
! PR fortran/46945
! { dg-do run }
! { dg-options "-O -ftree-vrp -fno-tree-ccp -fno-tree-fre" }
program pr46945
real, allocatable :: a(:,:,:)
integer :: n
n = 0
allocate (a(n,n,n))
end program pr46945