aboutsummaryrefslogtreecommitdiff
path: root/test/example_packages/hello_complex_2/src/farewell_m.f90
diff options
context:
space:
mode:
authorMilan Curcic <caomaco@gmail.com>2020-10-02 15:49:47 -0400
committerGitHub <noreply@github.com>2020-10-02 15:49:47 -0400
commit75c1da54b337a08f8205db19e49606e30b4ce2bb (patch)
tree5a945ac788a8abcfaaf6c5675ddff4507e3e7ebf /test/example_packages/hello_complex_2/src/farewell_m.f90
parent0c35749e0d90b5de43a7a90eb47677695e5c81e2 (diff)
parent0fe14b81507be3fe1cd6beda4b960384e813732d (diff)
downloadfpm-75c1da54b337a08f8205db19e49606e30b4ce2bb.tar.gz
fpm-75c1da54b337a08f8205db19e49606e30b4ce2bb.zip
Merge pull request #190 from LKedward/auto-discovery
Auto discovery of executables
Diffstat (limited to 'test/example_packages/hello_complex_2/src/farewell_m.f90')
-rw-r--r--test/example_packages/hello_complex_2/src/farewell_m.f9013
1 files changed, 13 insertions, 0 deletions
diff --git a/test/example_packages/hello_complex_2/src/farewell_m.f90 b/test/example_packages/hello_complex_2/src/farewell_m.f90
new file mode 100644
index 0000000..9fc75b9
--- /dev/null
+++ b/test/example_packages/hello_complex_2/src/farewell_m.f90
@@ -0,0 +1,13 @@
+module farewell_m
+ implicit none
+ private
+
+ public :: make_farewell
+contains
+ function make_farewell(name) result(greeting)
+ character(len=*), intent(in) :: name
+ character(len=:), allocatable :: greeting
+
+ greeting = "Goodbye, " // name // "!"
+ end function make_farewell
+end module farewell_m