tests/testthat/test-test.R

context("test-test.R")

test_that("bq_test_dataset automatically cleans up", {
  ds <- bq_test_dataset()
  expect_true(bq_dataset_exists(ds))

  attr(ds, "env") <- NULL
  gc()

  expect_false(bq_dataset_exists(ds))
})
wilpoole-essence/bigrquery documentation built on May 6, 2019, 8:06 p.m.