tests/testthat/test_TestCaseDefinition.R

context("TestCaseDefinition")

t <- TestCaseDefinition(list(as.double(34L), 44.5), 78.5, 'a test case definition')

test_that("TestCaseDefinition - for coverage", {
  expect_output(print(t))
})

Try the wyz.code.offensiveProgramming package in your browser

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

wyz.code.offensiveProgramming documentation built on Sept. 25, 2023, 9:05 a.m.