summaryrefslogtreecommitdiff
path: root/t/t4018/fortran-external-function
diff options
context:
space:
mode:
Diffstat (limited to 't/t4018/fortran-external-function')
-rw-r--r--t/t4018/fortran-external-function9
1 files changed, 9 insertions, 0 deletions
diff --git a/t/t4018/fortran-external-function b/t/t4018/fortran-external-function
new file mode 100644
index 0000000..5a2d85d
--- /dev/null
+++ b/t/t4018/fortran-external-function
@@ -0,0 +1,9 @@
+function RIGHT(a, b) result(c)
+
+integer, intent(in) :: ChangeMe
+integer, intent(in) :: b
+integer, intent(out) :: c
+
+c = a+b
+
+end function RIGHT