tests/testthat/setup.R

writeLines(
  "If you see me, something has gone wrong with old-school teardown",
  "DELETE-ME"
)
writeLines(
  "If you see me, something has gone wrong with new-school teardown",
  "DELETE-ME-2"
)
withr::defer(unlink("DELETE-ME-2"), teardown_env())

Try the testthat package in your browser

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

testthat documentation built on Jan. 21, 2022, 1:10 a.m.