tests/testthat/helpers.R

with_options <- function(opts, expr) {
	old <- options(opts)
	on.exit(options(old))
	force(expr)
}
gadenbuie/grkstyle documentation built on Oct. 25, 2023, 4:53 p.m.