diff options
Diffstat (limited to 'archive/tests/1')
-rw-r--r-- | archive/tests/1/a.f90 | 11 | ||||
-rw-r--r-- | archive/tests/1/b.f90 | 10 | ||||
-rw-r--r-- | archive/tests/1/fpm.toml | 2 | ||||
-rw-r--r-- | archive/tests/1/main.f90 | 8 |
4 files changed, 31 insertions, 0 deletions
diff --git a/archive/tests/1/a.f90 b/archive/tests/1/a.f90 new file mode 100644 index 0000000..a4f64a2 --- /dev/null +++ b/archive/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/archive/tests/1/b.f90 b/archive/tests/1/b.f90 new file mode 100644 index 0000000..8b57633 --- /dev/null +++ b/archive/tests/1/b.f90 @@ -0,0 +1,10 @@ +module b +implicit none + +contains + + subroutine g() + print *, "g()" + end subroutine + +end module diff --git a/archive/tests/1/fpm.toml b/archive/tests/1/fpm.toml new file mode 100644 index 0000000..c7d48a4 --- /dev/null +++ b/archive/tests/1/fpm.toml @@ -0,0 +1,2 @@ +[dependencies] +a = "4.0.0" diff --git a/archive/tests/1/main.f90 b/archive/tests/1/main.f90 new file mode 100644 index 0000000..d886be3 --- /dev/null +++ b/archive/tests/1/main.f90 @@ -0,0 +1,8 @@ +program test1 +use a, only: f +implicit none + +call f() + +print *, "TEST1 OK" +end |