2 ! { dg-options "-O -Wuninitialized" }
13 function baz(arg) result(res) ! { dg-bogus "res.yr' may be" }
14 type(bar), intent(in) :: arg
16 logical, external:: some_func
17 if (.not. some_func(arg)) then
18 call fatal('arg not valid')
22 end function baz ! { dg-warning "res.yr' may be" }
26 ! { dg-final { cleanup-modules "foo" } }