1! { dg-do compile }
2! { dg-options "-fdec-static" }
3! An AUTOMATIC statement cannot be used with SAVE
4FUNCTION X()
5REAL, SAVE, AUTOMATIC :: Y ! { dg-error "AUTOMATIC attribute conflicts with SAVE attribute" }
6y = 1
7END FUNCTION X
8END
9