tests/testthat/too-many-failures.R

test_that("SummaryReport gives up if too many errors", {
  expect_equal(Inf, 1)
  expect_equal(Inf, 2)
  expect_equal(Inf, 3)
  expect_equal(Inf, 4)
  expect_equal(Inf, 5)
  expect_equal(Inf, 6)
  expect_equal(Inf, 7)
  expect_equal(Inf, 8)
  expect_equal(Inf, 9)
  expect_equal(Inf, 10)
})

Try the testthat package in your browser

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

testthat documentation built on Jan. 21, 2022, 1:10 a.m.