4 ! Functions shall not have an initializer.
7 function f1() ! { dg-error "cannot have an initializer" }
11 function f2() RESULT (r
) ! { dg-error "cannot have an initializer" }
15 function f3() RESULT (f3
) ! { dg-error "must be different than function name" }
17 end function ! { dg-error "Expecting END PROGRAM" }
18 ! { dg-error "Unexpected end of file" "" { target "*-*-*" } 0 }