tests/testthat/test_rand_error.R

context("Test the error handlers for rand_* functions")

test_that("rand_bytes detects non-numeric arguments", {

  expect_that(rand_bytes("turnip"), throws_error(regexp = "numeric", fixed = TRUE))

})
jrdenggithub/opensslNV documentation built on May 30, 2019, 12:02 a.m.