tests/testthat/test-example.R

test_that("all example basenames listed", {
  skip_non_utf8()
  p <- srt_example()
  expect_length(p, 1)
  expect_type(p, "character")
})
kiernann/srt documentation built on March 15, 2024, 3:28 a.m.