tests/testthat/setup.R

local_cachedir <- file.path(tempdir(), "rb3-cache")
withr::defer(unlink(local_cachedir, recursive = TRUE), teardown_env())

op <- options(
  rb3.cachedir = local_cachedir,
  rb3.silent = TRUE
)

withr::defer(options(op), teardown_env())
wilsonfreitas/rbmfbovespa documentation built on April 13, 2025, 11:12 p.m.