diff options
| author | Ondřej Čertík <ondrej@certik.us> | 2020-01-12 10:37:39 -0700 |
|---|---|---|
| committer | Ondřej Čertík <ondrej@certik.us> | 2020-01-12 10:37:39 -0700 |
| commit | 4671b5f14f5ff8ad286f1bcab6fee91e0df20926 (patch) | |
| tree | 39a00fec58825c15549a4d389a9c2a7c43033a30 /tests | |
| parent | d299de0bd577b1aee121cdd728451af3ad857791 (diff) | |
| download | fpm-4671b5f14f5ff8ad286f1bcab6fee91e0df20926.tar.gz fpm-4671b5f14f5ff8ad286f1bcab6fee91e0df20926.zip | |
Add a test
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/1/a.f90 | 11 | ||||
| -rw-r--r-- | tests/1/b.f90 | 10 | ||||
| -rw-r--r-- | tests/1/main.f90 | 8 |
3 files changed, 29 insertions, 0 deletions
diff --git a/tests/1/a.f90 b/tests/1/a.f90 new file mode 100644 index 0000000..a4f64a2 --- /dev/null +++ b/tests/1/a.f90 @@ -0,0 +1,11 @@ +module a +use b, only: g +implicit none + +contains + + subroutine f() + call g() + end subroutine + +end module diff --git a/tests/1/b.f90 b/tests/1/b.f90 new file mode 100644 index 0000000..8b57633 --- /dev/null +++ b/tests/1/b.f90 @@ -0,0 +1,10 @@ +module b +implicit none + +contains + + subroutine g() + print *, "g()" + end subroutine + +end module diff --git a/tests/1/main.f90 b/tests/1/main.f90 new file mode 100644 index 0000000..75914de --- /dev/null +++ b/tests/1/main.f90 @@ -0,0 +1,8 @@ +program test1 +use a, only: f +implicit none + +call f() + +print *, "OK" +end |