tests/testthat/test-tasks-base.R

In ropenscilabs/tic: Tasks Integrating Continuously: CI-Agnostic Workflow Definitions

test_that("can't run base task", {
  task <- TicStep$new()
  expect_null(task$prepare())
  expect_true(task$check())
  expect_error(task$run(), "override")
})

test_that("can run hello world task", {
  task <- step_hello_world()
  expect_null(task$prepare())
  expect_true(task$check())
  expect_output(task$run(), "world")
})