diff options
Diffstat (limited to 'circular_example')
| -rw-r--r-- | circular_example/.gitignore | 1 | ||||
| -rw-r--r-- | circular_example/fpm.toml | 8 | ||||
| -rw-r--r-- | circular_example/src/greet_m.f90 | 13 | ||||
| -rw-r--r-- | circular_example/tests/main.f90 | 7 |
4 files changed, 29 insertions, 0 deletions
diff --git a/circular_example/.gitignore b/circular_example/.gitignore new file mode 100644 index 0000000..a007fea --- /dev/null +++ b/circular_example/.gitignore @@ -0,0 +1 @@ +build/* diff --git a/circular_example/fpm.toml b/circular_example/fpm.toml new file mode 100644 index 0000000..034ec57 --- /dev/null +++ b/circular_example/fpm.toml @@ -0,0 +1,8 @@ +name = "circular_example" + +[[test]] + name = "test" + source-dir = "tests" + main = "main.f90" + [test.dependencies] + circular_test = { path = "../circular_test" } diff --git a/circular_example/src/greet_m.f90 b/circular_example/src/greet_m.f90 new file mode 100644 index 0000000..2372f9a --- /dev/null +++ b/circular_example/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 diff --git a/circular_example/tests/main.f90 b/circular_example/tests/main.f90 new file mode 100644 index 0000000..5b7d803 --- /dev/null +++ b/circular_example/tests/main.f90 @@ -0,0 +1,7 @@ +program run_tests + use hello_test, only: run_test + + implicit none + + call run_test +end program run_tests |