release_lock Subroutine

public subroutine release_lock(cache_dir, project_name)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: cache_dir
character(len=*), intent(in) :: project_name

Source Code

    subroutine release_lock(cache_dir, project_name)
        character(len=*), intent(in) :: cache_dir, project_name
        character(len=512) :: lock_file

        lock_file = get_lock_file_path(cache_dir, project_name)
        call remove_lock(lock_file)

    end subroutine release_lock