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 Oct. 6, 2023, 5:10 p.m.