tests/testthat/test-list.R

In richfitz/RcppR6: Code-generation Wrapping C++ Classes as R6 Classes

context("list")

test_that("list", {
  path <- system.file("examples/list", package="RcppR6")
  pkg <- RcppR6:::prepare_temporary(path)

  RcppR6::install(pkg)
  devtools::document(pkg)
  expect_that(RcppR6::check(pkg), not(throws_error()))
  ## fresh=TRUE here would be nice, but can't happen.
  expect_that(pkg, passes_tests())
  ## Should always clean up here, really.  Will go away when the
  ## tempdir issue does.
  unlink(pkg, recursive=TRUE)
})