tests/test_isFALSE.R

source("helper/helper.R")

f = backports:::isFALSE
expect_identical(f(FALSE), TRUE)
expect_identical(f(TRUE), FALSE)
expect_identical(f(1), FALSE)
expect_identical(f(iris), FALSE)
expect_identical(f(structure(FALSE, foo = "bar")), TRUE)

Try the backports package in your browser

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

backports documentation built on Dec. 13, 2021, 5:08 p.m.