tests/testthat/test-format_list_of.R

test_that("smoke test", {
  local_override_size_sum()

  v <- vctrs::new_list_of(list(1L, 2:4), integer())
  expect_snapshot({
    pillar(v, width = 15)
  })

  v <- vctrs::new_list_of(list(as_override_size_sum(1:3)), as_override_size_sum(integer()))
  expect_snapshot({
    pillar(v, width = 30)
  })
})

Try the pillar package in your browser

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

pillar documentation built on July 29, 2021, 9:06 a.m.