/usr/share/doc/r-cran-testthat/tests/testthat/test-expect-logical.R is in r-cran-testthat 2.0.0-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | context("expect-logical")
test_that("logical tests act as expected", {
expect_success(expect_true(TRUE))
expect_success(expect_false(FALSE))
expect_failure(expect_true(FALSE), "FALSE isn't true")
expect_failure(expect_false(TRUE), "TRUE isn't false")
})
test_that("logical tests ignore attributes", {
expect_success(expect_true(c(a = TRUE)))
expect_success(expect_false(c(a = FALSE)))
})
test_that("additional info returned in message", {
expect_failure(expect_true(FALSE, "NOPE"), "\nNOPE")
expect_failure(expect_false(TRUE, "YUP"), "\nYUP")
})
|