new_dependency_tree Subroutine

public subroutine new_dependency_tree(self, verbosity, cache, path_to_config, build_dir)

Create a new dependency tree

Arguments

Type IntentOptional Attributes Name
type(dependency_tree_t), intent(out) :: self

Instance of the dependency tree

integer, intent(in), optional :: verbosity

Verbosity of printout

character(len=*), intent(in), optional :: cache

Name of the cache file

character(len=*), intent(in), optional :: path_to_config

Path to the global config file.

character(len=*), intent(in), optional :: build_dir

Custom build directory


Source Code

  subroutine new_dependency_tree(self, verbosity, cache, path_to_config, build_dir)
    !> Instance of the dependency tree
    type(dependency_tree_t), intent(out) :: self
    !> Verbosity of printout
    integer, intent(in), optional :: verbosity
    !> Name of the cache file
    character(len=*), intent(in), optional :: cache
    !> Path to the global config file.
    character(len=*), intent(in), optional :: path_to_config
    !> Custom build directory
    character(len=*), intent(in), optional :: build_dir

    call resize(self%dep)
    if (present(build_dir)) then
        self%dep_dir = join_path(build_dir, "dependencies")
    else
        self%dep_dir = join_path("build", "dependencies")
    end if

    if (present(verbosity)) self%verbosity = verbosity

    if (present(cache)) self%cache = cache

    if (present(path_to_config)) self%path_to_config = path_to_config

  end subroutine new_dependency_tree