tests/testthat/test-reporter-silent.R

test_that("captures expectations; doesn't produce any output", {
  reporter <- SilentReporter$new()
  expect_snapshot_reporter(reporter)
  expect_snapshot_value(length(reporter$expectations()))
})

Try the testthat package in your browser

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

testthat documentation built on Dec. 10, 2022, 1:06 a.m.