blob: e0caed102d71bdaf6175a269f08d80653afb27e5 (
plain)
1
2
3
4
5
6
7
8
|
! { dg-do compile }
! PR fortran/86059
program foo
integer :: i(2) = [ null(), 1 ] ! { dg-error "cannot appear in an array constructor" }
integer :: j(2) = [ (null(), n = 1, 2) ] ! { dg-error "cannot appear in an array constructor" }
integer k(2)
k = 42 + [1, null()] ! { dg-error "cannot appear in an array constructor" }
end program foo
|