get_cache_dir(tmpdir) not equal to `tmpdir`.
1/1 mismatches
x[1]: "\\\\tmp\\rcldf"
y[1]: "//tmp/rcldf"

expect_equal(get_dir_size(system.file("extdata/examples/wals_1A_cldf/", package = "rcldf")), 13696)
old_env <- Sys.getenv("RCLDF_CACHE_DIR", unset = NA)
if (!is.na(old_env) & nzchar(old_env)) {
tmpdir <- file.path("/", "tmp", "rcldf")
expect_equal(get_cache_dir(), tools::R_user_dir("rcldf", which = "cache"))
tmpdir <- file.path("/", "tmp", "rcldf2")
# use the package inst/extdata as example
files <- list_cache_files(cache_dir=system.file("extdata/examples", package = "rcldf"))