tests/testthat/test-class_database_gcp.R

In ropensci/targets: Dynamic Function-Oriented 'Make'-Like Declarative Pipelines

tar_test("validate GCP database", {
  skip_if_not_installed("googleCloudStorageR")
  out <- database_init(
    repository = "gcp",
    resources = tar_resources(
      gcp = tar_resources_gcp(bucket = "x", prefix = "x")
    )
  )
  on.exit(out$close())
  expect_silent(out$validate())
})