if (FALSE) { # requireNamespace("RSQLite", quietly = TRUE)
cnr <- new("DBIConnector",
.drv = RSQLite::SQLite(),
.conn_args = list(dbname = ":memory:", password = function() "supersecret")
)
dbGetConnectArgs(cnr)
dbGetConnectArgs(cnr, eval = FALSE)
}
Run the code above in your browser using DataLab