tests/testthat/test_fis.R

In paws.developer.tools: 'Amazon Web Services' Developer Tools Services

svc <- paws::fis()

test_that("list_actions", {
  expect_error(svc$list_actions(), NA)
})

test_that("list_experiment_templates", {
  expect_error(svc$list_experiment_templates(), NA)
})

test_that("list_experiments", {
  expect_error(svc$list_experiments(), NA)
})

test_that("list_target_resource_types", {
  expect_error(svc$list_target_resource_types(), NA)
})