inst/tinytest/special/test-zzz.R

# remove fake package files from temporary directory:
to.dir <- tempdir() |> normalizePath()
dir2remove <- file.path(to.dir, list.files(to.dir)) |> normalizePath()
unlink(dir2remove, recursive = TRUE, force = TRUE)

expect_false(any(file.exists(dir2remove)))

Try the tinycodet package in your browser

Any scripts or data that you put into this service are public.

tinycodet documentation built on Sept. 12, 2024, 7:03 a.m.