tests/testthat/test_ambiguous_prepare.R

In duckdb: DBI Package for the DuckDB Database Management System

test_that("Test ambiguous prepare statements", {
  con <- dbConnect(duckdb())
  on.exit(dbDisconnect(con, shutdown = TRUE))

  res <- dbGetQuery(con, "select ?", 42)
  expect_identical(res[[1]], 42)

  res <- dbGetQuery(con, "select ?", "hello world")
  expect_identical(res[[1]], "hello world")
})