source("helper/helper.R")
if (exists("R_user_dir", envir = asNamespace("tools"))) {
f = get("R_user_dir", envir = asNamespace("tools"))
expect_same = makeCompareFun(f, backports:::R_user_dir)
expect_same("backports")
expect_same("backports", which = "data")
expect_same("backports", which = "config")
expect_same("backports", which = "cache")
}
Generated by dwww version 1.15 on Wed Jun 26 02:42:17 CEST 2024.