tests/testthat/test-print.R

test_that("Print exported objects", {
  stats %as% st
  expect_identical(
    capture.output(print(st)),
    capture.output(print(sort(getNamespaceExports("stats"))))
  )
})
atusy/pkgas documentation built on Sept. 22, 2020, 10:52 p.m.