Remove old autovect-branch by moving to "dead" directory.
[official-gcc.git] / old-autovect-branch / gcc / testsuite / gfortran.fortran-torture / compile / module_result.f90
blob105073596f5ad904935f427f83fcf3f042ec5d48
1 ! Result variables in module procedures
2 module module_result
3 implicit none
4 contains
5 function test () result (res)
6 integer res
7 res = 0
8 end function
9 end module