tests/testthat/test-vos_configure.R

In cboettig/virtuoso: Interface to 'Virtuoso' using 'ODBC'

context("vos_configure")

test_that("We can create a custom virtuoso.ini file", {

  skip_on_cran()
  ini <- vos_configure()
  skip_if(is.null(ini))
  expect_true(file.exists(ini))
  parsed <- ini::read.ini(ini)
  expect_is(parsed, "list")
})