tests/testthat/test-token.R

context("token")

test_that("`get_token` works", {
  token <- ImmPortR:::get_token()

  expect_is(token, "character")
  expect_match(token, "\\S+")
})
RGLab/ImmPortR documentation built on Sept. 6, 2022, 2:47 p.m.