tests/testthat/test_310_stmt_select.R

testthat::context("Statement Select class")

testthat::test_that("We can use DISTINCT keyword", {
  x <- StmtSelectAll$new(distinct = TRUE)
  testthat::expect_equal(x$toString(), "SELECT DISTINCT *")
})

Try the sqlq package in your browser

Any scripts or data that you put into this service are public.

sqlq documentation built on Sept. 16, 2025, 9:10 a.m.