5 ! Entry was previously not possible in a module.
6 ! Checks also whether the different result combinations
18 entry ent(a) result(func2)
19 ent = -a*4.0 ! { dg-error "is not a variable" }
27 function func(a) result(res)
33 entry ent(a) result(func2)
34 ent = -a*6.0 ! { dg-error "is not a variable" }