4 ! Check errors for use of STATIC/AUTOMATIC without -fdec-static.
9 integer, automatic :: a
! { dg-error "is a DEC extension" }
10 integer, static :: b
! { dg-error "is a DEC extension" }
13 integer :: auto1
, auto2
, static1
, static2
, save1
, save2
14 automatic auto1
! { dg-error "is a DEC extension" }
15 automatic :: auto2
! { dg-error "is a DEC extension" }
16 static static1
! { dg-error "is a DEC extension" }
17 static :: static2
! { dg-error "is a DEC extension" }