inst/tinytest/test_let_null.R

test_let_null <- function() {
  e1 = as.character(let(c("z"= "z"), dDT[,"x":=NULL], eval=FALSE))
  e2 = as.character(let(list(), dDT[,"x":=NULL], eval=FALSE))
  expect_equal(e1, e2)

  invisible(NULL)
}

test_let_null()
WinVector/wrapr documentation built on Aug. 29, 2023, 4:51 a.m.