diff options
author | Milan Curcic <caomaco@gmail.com> | 2020-10-02 15:49:47 -0400 |
---|---|---|
committer | GitHub <noreply@github.com> | 2020-10-02 15:49:47 -0400 |
commit | 75c1da54b337a08f8205db19e49606e30b4ce2bb (patch) | |
tree | 5a945ac788a8abcfaaf6c5675ddff4507e3e7ebf /test/example_packages/hello_complex_2/src/farewell_m.f90 | |
parent | 0c35749e0d90b5de43a7a90eb47677695e5c81e2 (diff) | |
parent | 0fe14b81507be3fe1cd6beda4b960384e813732d (diff) | |
download | fpm-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.f90 | 13 |
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 |