tests/testthat/test-utils.R

context("utils")

test_that("get_package_list", {
  act <- get_package_list()

  expect_false(is.null(act))
})

test_that("stop_without_message", {
  expect_error(
    expect_silent(
      stop_without_message()
    )
  )
})

Try the githubinstall package in your browser

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

githubinstall documentation built on May 2, 2019, 4:20 a.m.