From 04fd3870fb8cbb6014a197b26b71f6e3021ccba1 Mon Sep 17 00:00:00 2001
From: LKedward <laurence.kedward@bristol.ac.uk>
Date: Sat, 26 Sep 2020 11:11:01 +0100
Subject: Add: example package with program discovery

---
 test/example_packages/hello_complex_2/src/greet_m.f90 | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 test/example_packages/hello_complex_2/src/greet_m.f90

(limited to 'test/example_packages/hello_complex_2/src/greet_m.f90')

diff --git a/test/example_packages/hello_complex_2/src/greet_m.f90 b/test/example_packages/hello_complex_2/src/greet_m.f90
new file mode 100644
index 0000000..2372f9a
--- /dev/null
+++ b/test/example_packages/hello_complex_2/src/greet_m.f90
@@ -0,0 +1,13 @@
+module greet_m
+    implicit none
+    private
+
+    public :: make_greeting
+contains
+    function make_greeting(name) result(greeting)
+        character(len=*), intent(in) :: name
+        character(len=:), allocatable :: greeting
+
+        greeting = "Hello, " // name // "!"
+    end function make_greeting
+end module greet_m
-- 
cgit v1.2.3