]> git.ipfire.org Git - thirdparty/git.git/blob - t/t4018/fortran-external-function
Merge branch 'ds/maintenance-commit-graph-auto-fix'
[thirdparty/git.git] / t / t4018 / fortran-external-function
1 function RIGHT(a, b) result(c)
2
3 integer, intent(in) :: ChangeMe
4 integer, intent(in) :: b
5 integer, intent(out) :: c
6
7 c = a+b
8
9 end function RIGHT