2 ! { dg
-options
" -Werror" }
4 ! gfortran ignores
-Werror
6 program warnings_are_errors_1
11 0 r1
= 0 ! { dg
-warning
"Zero is not a valid statement label" }
14 ! gfc_notify_std
(GFC_STD_F95_DEL
):
15 do r1
= 1, 2 ! { dg
-error
"Deleted feature: Loop variable" }
20 r2
(4) = 0 ! { dg
-warning
"is out of bounds" }
24 ! { dg
-final
{ output
-exists
-not
} }