test_that("ds_cf print show correct output", {
  expect_snapshot(print(load_test_ds_cf()) %>% capture.output())
})

test_that("ds_mc print show correct output", {
  expect_snapshot(print(load_test_ds_mc()) %>% capture.output())
})

test_that("ds_mcf print show correct output", {
  expect_snapshot(print(load_test_ds_mcf()) %>% capture.output())
})

test_that("ds_pc print show correct output", {
  expect_snapshot(print(load_test_ds_pc()) %>% capture.output())
})

test_that("ds_ro print show correct output", {
  expect_snapshot(print(load_test_ds_ro()) %>% capture.output())
})