diff options
| author | LKedward <laurence.kedward@bristol.ac.uk> | 2020-09-19 13:42:07 +0100 |
|---|---|---|
| committer | LKedward <laurence.kedward@bristol.ac.uk> | 2020-09-19 13:42:07 +0100 |
| commit | 0308cf5ecdc4974bd08dc352ebd6a39a548d55cc (patch) | |
| tree | 3d874677bef45b5db78b1a11e2a3f2bfc07019aa /test/example_packages/hello_complex/source/greet_m.f90 | |
| parent | a110523b8ff0eec8229554917909d4ab05690ea6 (diff) | |
| download | fpm-0308cf5ecdc4974bd08dc352ebd6a39a548d55cc.tar.gz fpm-0308cf5ecdc4974bd08dc352ebd6a39a548d55cc.zip | |
Update: hello_complex example with sub directory
To demonstrate and test recursive source file discovery.
Diffstat (limited to 'test/example_packages/hello_complex/source/greet_m.f90')
| -rw-r--r-- | test/example_packages/hello_complex/source/greet_m.f90 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/example_packages/hello_complex/source/greet_m.f90 b/test/example_packages/hello_complex/source/greet_m.f90 index 2372f9a..38afd08 100644 --- a/test/example_packages/hello_complex/source/greet_m.f90 +++ b/test/example_packages/hello_complex/source/greet_m.f90 @@ -1,4 +1,5 @@ module greet_m + use subdir_constants, only: GREET_STR implicit none private @@ -8,6 +9,6 @@ contains character(len=*), intent(in) :: name character(len=:), allocatable :: greeting - greeting = "Hello, " // name // "!" + greeting = GREET_STR // name // "!" end function make_greeting end module greet_m |