3 ! PR 50073: gfortran must not accept function name when result name is present
5 ! Contributed by Vittorio Zecca <zeccav@gmail.com>
7 function fun() result(f
) ! { dg-error "RESULT variable" }
8 pointer fun
! { dg-error "RESULT variable" }
9 dimension fun(1) ! { dg-error "RESULT variable" }