tests/testthat/setup.R

In ropensci/dittodb: A Test Environment for Database Requests

# use a temp directory so we don't have to cleanup later
temp_dir <- tempdir()
db_mock_paths(temp_dir)

# load various libraries
library(DBI)
library(RSQLite)
library(glue)

# TODO: use options dittodb.test.user and dittodb.test.pw?
db_user <- "travis"
db_pass <- "*V7y5N2r"

odbc_driver <- if (.Platform[["OS.type"]] == "windows") {
  "PostgreSQL Unicode(x64)"
} else {
  "PostgreSQL Unicode"
}