/usr/share/doc/r-cran-backports/tests/test_dQuote.R

dwww Home | Show directory contents | Find package

source("helper/helper.R")

f = get("dQuote", envir = baseenv())
expect_same = makeCompareFun(f, backports:::dQuote)

expect_same("foo")
if (getRversion() >= "3.6.0") {
  expect_same("foo", q = TRUE)
  expect_same("foo", q = FALSE)
}


f = get("sQuote", envir = baseenv())
expect_same = makeCompareFun(f, backports:::sQuote)

expect_same("foo")
if (getRversion() > "3.6.0") {
  expect_same("foo", q = TRUE)
  expect_same("foo", q = FALSE)
}

Generated by dwww version 1.15 on Wed Jun 26 02:30:18 CEST 2024.