tests/testthat/test-methodListSourceTables.R

test_that("listSourceTables", {
  expect_error(listSourceTables())
  expect_error(listSourceTables("sdfg"))
  cdm <- emptyCdmReference("mock")
  expect_identical(listSourceTables(cdm = cdm), character())
})

Try the omopgenerics package in your browser

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

omopgenerics documentation built on Sept. 30, 2024, 9:16 a.m.