Create a test context, set and query the default context.
make_context(
drv,
connect_args = NULL,
set_as_default = TRUE,
tweaks = NULL,
name = NULL,
default_skip = NULL
)
set_default_context(ctx)
get_default_context()
[DBIConnector]
An object of class DBIConnector that describes how to connect
to the database.
[named list]
Deprecated.
[logical(1)]
Should the created context be
set as default context?
[DBItest_tweaks]
Tweaks as constructed by the
tweaks()
function.
[character]
An optional name of the context which will
be used in test messages.
[character]
Default value of skip
argument
to test_all()
and other testing functions.
[DBItest_context]
A test context.
[DBItest_context]
A test context, for
set_default_context
the previous default context (invisibly) or
NULL
.
make_context(
new(
"DBIConnector",
.drv = RSQLite::SQLite(),
.conn_args = list(dbname = tempfile("DBItest", fileext = ".sqlite"))
),
tweaks = tweaks(
constructor_relax_args = TRUE,
placeholder_pattern = c("?", "$1", "$name", ":name"),
date_cast = function(x) paste0("'", x, "'"),
time_cast = function(x) paste0("'", x, "'"),
timestamp_cast = function(x) paste0("'", x, "'"),
logical_return = function(x) as.integer(x),
date_typed = FALSE,
time_typed = FALSE,
timestamp_typed = FALSE
),
default_skip = c("roundtrip_date", "roundtrip_timestamp")
)
#> $cnr
#> <DBIConnector><SQLiteDriver>
#> Arguments:
#> $dbname
#> [1] "/tmp/RtmppPW7vQ/DBItest1f078bc926e.sqlite"
#>
#>
#> $drv
#> <SQLiteDriver>
#>
#> $tweaks
#> DBItest tweaks:
#> constructor_relax_args: TRUE
#> strict_identifier: FALSE
#> omit_blob_tests: FALSE
#> current_needs_parens: FALSE
#> union: function (x)
#> placeholder_pattern: ?
#> logical_return: function (x)
#> date_cast: function (x)
#> time_cast: function (x)
#> timestamp_cast: function (x)
#> blob_cast: function (x)
#> date_typed: FALSE
#> time_typed: FALSE
#> timestamp_typed: FALSE
#> temporary_tables: TRUE
#> list_temporary_tables: TRUE
#> is_null_check: function (x)
#> create_table_as: function (table_name, query)
#> dbitest_version: 1.7.1
#>
#> $name
#> NULL
#>
#> $default_skip
#> [1] "roundtrip_date" "roundtrip_timestamp"
#>
#> attr(,"class")
#> [1] "DBItest_context"