inst/examplepkg/tests/testthat/test-s3-example.R

test_that("s3_example_func works using default dispatch", {
  expect_equal(s3_example_func(1L), "default")  
})

test_that("s3_example_func works using list dispatch", {
  expect_equal(s3_example_func(list(1, 2, 3)), "list")  
})

Try the covtracer package in your browser

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

covtracer documentation built on Sept. 12, 2024, 7:40 a.m.