tests/testthat/helpers.R

In solvebio/solvebio-r: The Official SolveBio API Client

library(solvebio)

assert_api_key <- function() {
    token <- solvebio:::.solveEnv$token
    if (is.null(token) || nchar(token) == 0) {
        skip("API key not set")
    }
}