tests/testthat/test-request.R

In axprism: Client for the 'AxPrism' Institutional XBRL and Shariah Compliance API

# Offline tests for argument validation in axprism_request. The validation and
# method dispatch happen before any HTTP call, so these never reach the network.

test_that("axprism_request requires an axprism_client", {
  expect_error(
    axprism_request("not-a-client", "GET", "/api/v1/health"),
    "inherits"
  )
})

test_that("axprism_request rejects unsupported HTTP methods", {
  client <- axprism_client(api_key = "demo-key")
  expect_error(
    axprism_request(client, "PATCH", "/api/v1/health"),
    "unsupported method"
  )
})