aboutsummaryrefslogtreecommitdiff
path: root/test/fpm_test/test_package_dependencies.f90
diff options
context:
space:
mode:
authorJohn S. Urban <urbanjost@comcast.net>2021-07-18 19:42:58 -0400
committerJohn S. Urban <urbanjost@comcast.net>2021-07-18 19:42:58 -0400
commit83f1fc0be44831b32869126be0afc55431791b56 (patch)
tree5c5e7d4b624610a39687ab925cc2c57ae645f6e5 /test/fpm_test/test_package_dependencies.f90
parent1715c04c7e662599d20d2a43e8cc1e9cfbd2fa54 (diff)
downloadfpm-83f1fc0be44831b32869126be0afc55431791b56.tar.gz
fpm-83f1fc0be44831b32869126be0afc55431791b56.zip
remove warnings and fix truncated help text
Diffstat (limited to 'test/fpm_test/test_package_dependencies.f90')
-rw-r--r--test/fpm_test/test_package_dependencies.f9010
1 files changed, 2 insertions, 8 deletions
diff --git a/test/fpm_test/test_package_dependencies.f90 b/test/fpm_test/test_package_dependencies.f90
index b70ac13..a3192ff 100644
--- a/test/fpm_test/test_package_dependencies.f90
+++ b/test/fpm_test/test_package_dependencies.f90
@@ -25,7 +25,7 @@ contains
!> Collection of tests
type(unittest_t), allocatable, intent(out) :: testsuite(:)
-
+
testsuite = [ &
& new_unittest("cache-load-dump", test_cache_load_dump), &
& new_unittest("cache-dump-load", test_cache_dump_load), &
@@ -139,7 +139,6 @@ contains
type(toml_table) :: table
type(toml_table), pointer :: ptr
- type(toml_key), allocatable :: list(:)
type(dependency_tree_t) :: deps
table = toml_table()
@@ -169,8 +168,7 @@ contains
type(error_t), allocatable, intent(out) :: error
type(toml_table) :: table
- type(toml_table), pointer :: child, ptr
- type(toml_key), allocatable :: list(:)
+ type(toml_table), pointer :: ptr
type(mock_dependency_tree_t) :: deps
type(dependency_config_t), allocatable :: nodes(:)
@@ -224,10 +222,6 @@ contains
!> Error handling
type(error_t), allocatable, intent(out) :: error
- type(package_config_t) :: package
- character(len=:), allocatable :: manifest, proj_dir, revision
- logical :: fetch
-
if (dependency%done) then
call test_failed(error, "Should only visit this node once")
return