From b5b16cf826d468e79b4087500192a4a9e07c140f Mon Sep 17 00:00:00 2001 From: Brad Richardson Date: Wed, 14 Oct 2020 09:24:55 -0500 Subject: Better organize example packages and bootstrap tests --- example_packages/circular_example/.gitignore | 1 + example_packages/circular_example/fpm.toml | 4 ++++ example_packages/circular_example/src/greet_m.f90 | 13 +++++++++++++ example_packages/circular_example/test/main.f90 | 7 +++++++ 4 files changed, 25 insertions(+) create mode 100644 example_packages/circular_example/.gitignore create mode 100644 example_packages/circular_example/fpm.toml create mode 100644 example_packages/circular_example/src/greet_m.f90 create mode 100644 example_packages/circular_example/test/main.f90 (limited to 'example_packages/circular_example') diff --git a/example_packages/circular_example/.gitignore b/example_packages/circular_example/.gitignore new file mode 100644 index 0000000..a007fea --- /dev/null +++ b/example_packages/circular_example/.gitignore @@ -0,0 +1 @@ +build/* diff --git a/example_packages/circular_example/fpm.toml b/example_packages/circular_example/fpm.toml new file mode 100644 index 0000000..c524ce5 --- /dev/null +++ b/example_packages/circular_example/fpm.toml @@ -0,0 +1,4 @@ +name = "circular_example" + +[dev-dependencies] +circular_test = { path = "../circular_test" } diff --git a/example_packages/circular_example/src/greet_m.f90 b/example_packages/circular_example/src/greet_m.f90 new file mode 100644 index 0000000..2372f9a --- /dev/null +++ b/example_packages/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/example_packages/circular_example/test/main.f90 b/example_packages/circular_example/test/main.f90 new file mode 100644 index 0000000..5b7d803 --- /dev/null +++ b/example_packages/circular_example/test/main.f90 @@ -0,0 +1,7 @@ +program run_tests + use hello_test, only: run_test + + implicit none + + call run_test +end program run_tests -- cgit v1.2.3