tests/testthat/test_emr.R

In paws.analytics: 'Amazon Web Services' Analytics Services

svc <- paws::emr()

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

test_that("describe_release_label", {
  expect_error(svc$describe_release_label(MaxResults = 20), NA)
})

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

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

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

test_that("list_release_labels", {
  expect_error(svc$list_release_labels(MaxResults = 20), NA)
})

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

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

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