tests/testthat/test-throw.R

In packager: Create, Build and Maintain Packages

testthat::context("test throw")
testthat::test_that("throw the packager exception", {
                        error_message <- "hello, testthat"
                        testthat::expect_error(throw("hello, testthat"),
                                               error_message)
}
)