tests/testthat/test-sql.r

# test-sql.r

context( "sql" )

x <- "SELECT * FROM table"
stmt <- sql( x )

expect_is(stmt, "sql")
expect_equal( stmt[[1]], x )
decisionpatterns/sql.template documentation built on July 6, 2020, 8:41 a.m.