tests/testthat/test_parse.R

context("Parsing function accuracy")


test_that("Error codes", {
  resp <- httr:::response()
  resp$status_code <- 201
 expect_error(parse_response(resp))
})
ARawles/BMRSr documentation built on Feb. 1, 2023, 12:11 p.m.