Running ‘testthat.R’ [10s/16s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(withr)
  > 
  > test_check("withr")
  [ FAIL 3 | WARN 0 | SKIP 2 | PASS 360 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-db.R:18:5): with_db_connection: creates a single connection ─────
  Error in `(function (cond) 
  .Internal(C_tryCatchHelper(addr, 1L, cond)))(structure(list(message = "there is no package called 'RSQLite'", 
      call = loadNamespace(x), package = "RSQLite", lib.loc = NULL), class = c("packageNotFoundError", 
  "error", "condition")))`: error in evaluating the argument 'drv' in selecting a method for function 'dbConnect': there is no package called 'RSQLite'
  Backtrace:
       ▆
    1. ├─withr::with_db_connection(...) at test-db.R:18:4
    2. │ ├─base::stopifnot(all(is.named(con)))
    3. │ └─withr:::is.named(con)
    4. ├─DBI::dbConnect(RSQLite::SQLite(), db)
    5. ├─base::loadNamespace(x)
    6. │ ├─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
    7. │ │ └─base withOneRestart(expr, restarts[[1L]])
    8. │ │   └─base doWithOneRestart(return(expr), restart)
    9. │ └─base::stop(cond)
   10. └─base `<fn>`(`<pckgNtFE>`)
  ── Error (test-db.R:34:5): with_db_connection: creates multiple connections ────
  Error in `(function (cond) 
  .Internal(C_tryCatchHelper(addr, 1L, cond)))(structure(list(message = "there is no package called 'RSQLite'", 
      call = loadNamespace(x), package = "RSQLite", lib.loc = NULL), class = c("packageNotFoundError", 
  "error", "condition")))`: error in evaluating the argument 'drv' in selecting a method for function 'dbConnect': there is no package called 'RSQLite'
  Backtrace:
       ▆
    1. ├─withr::with_db_connection(...) at test-db.R:34:4
    2. │ ├─base::stopifnot(all(is.named(con)))
    3. │ └─withr:::is.named(con)
    4. ├─DBI::dbConnect(RSQLite::SQLite(), db)
    5. ├─base::loadNamespace(x)
    6. │ ├─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
    7. │ │ └─base withOneRestart(expr, restarts[[1L]])
    8. │ │   └─base doWithOneRestart(return(expr), restart)
    9. │ └─base::stop(cond)
   10. └─base `<fn>`(`<pckgNtFE>`)
  ── Error (test-db.R:61:5): local_db_connection: creates a single connection ────
  Error in `(function (cond) 
  .Internal(C_tryCatchHelper(addr, 1L, cond)))(structure(list(message = "there is no package called 'RSQLite'", 
      call = loadNamespace(x), package = "RSQLite", lib.loc = NULL), class = c("packageNotFoundError", 
  "error", "condition")))`: error in evaluating the argument 'drv' in selecting a method for function 'dbConnect': there is no package called 'RSQLite'
  Backtrace:
       ▆
    1. ├─(function() {... at test-db.R:61:4
    2. │ ├─withr::local_db_connection(...) at test-db.R:62:6
    3. │ │ ├─base::stopifnot(methods::is(con, "DBIConnection"))
    4. │ │ └─methods::is(con, "DBIConnection")
    5. │ └─DBI::dbConnect(RSQLite::SQLite(), db)
    6. ├─base::loadNamespace(x)
    7. │ ├─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
    8. │ │ └─base withOneRestart(expr, restarts[[1L]])
    9. │ │   └─base doWithOneRestart(return(expr), restart)
   10. │ └─base::stop(cond)
   11. └─base `<fn>`(`<pckgNtFE>`)
  
  [ FAIL 3 | WARN 0 | SKIP 2 | PASS 360 ]
  Error: Test failures
  Execution halted