We no longer recommend using setup() and teardown(); instead
we think it's better practice to use a test fixture as described in
vignette("test-fixtures").
Code in a setup() block is run immediately in a clean environment.
Code in a teardown() block is run upon completion of a test file,
even if it exits with an error. Multiple calls to teardown() will be
executed in the order they were created.
Usage
teardown(code, env = parent.frame())
setup(code, env = parent.frame())Examples
if (FALSE) { # \dontrun{
# Old approach
tmp <- tempfile()
setup(writeLines("some test data", tmp))
teardown(unlink(tmp))
} # }
# Now recommended:
local_test_data <- function(env = parent.frame()) {
tmp <- tempfile()
writeLines("some test data", tmp)
withr::defer(unlink(tmp), env)
tmp
}
# Then call local_test_data() in your tests
