diff options
Diffstat (limited to 'test/example_packages/hello_complex/source/farewell_m.f90')
| -rw-r--r-- | test/example_packages/hello_complex/source/farewell_m.f90 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/example_packages/hello_complex/source/farewell_m.f90 b/test/example_packages/hello_complex/source/farewell_m.f90 index 9fc75b9..fbc45ed 100644 --- a/test/example_packages/hello_complex/source/farewell_m.f90 +++ b/test/example_packages/hello_complex/source/farewell_m.f90 @@ -1,4 +1,5 @@ module farewell_m + use subdir_constants, only: FAREWELL_STR implicit none private @@ -8,6 +9,6 @@ contains character(len=*), intent(in) :: name character(len=:), allocatable :: greeting - greeting = "Goodbye, " // name // "!" + greeting = FAREWELL_STR // name // "!" end function make_farewell end module farewell_m |