tests/testthat/test_guardExecution.R

context("guardExecution")

test_that("guardExecution", {
  expect_type(guardExecution(get('XXX', mode = 'function'), FALSE), 'list')
  expect_type(guardExecution(get('XXX', mode = 'function'), TRUE), 'list')
})
neonira/wyz.code.testthat documentation built on Feb. 19, 2020, 12:48 p.m.