Clean up tests

tests/testthat/test-aaa-options.R

@@ -0,0 +1,7 @@
+# make_option_impl --------------------------------------------------------------------
+
+test_that("`make_option_impl()` snapshot test", {
+  expect_snapshot({
+    make_option_impl()
+  })
+})

tests/testthat/test-capital.R

@@ -0,0 +1,25 @@
+# pillar_capital ----------------------------------------------------------------------
+
+test_that("`pillar_capital()` snapshot test", {
+  expect_snapshot({
+    pillar_capital()
+  })
+})
+
+
+# new_pillar_capital ------------------------------------------------------------------
+
+test_that("`new_pillar_capital()` snapshot test", {
+  expect_snapshot({
+    new_pillar_capital()
+  })
+})
+
+
+# format ------------------------------------------------------------------------------
+
+test_that("`format()` snapshot test", {
+  expect_snapshot({
+    format()
+  })
+})

tests/testthat/test-char.R

@@ -0,0 +1,79 @@
+# char --------------------------------------------------------------------------------
+
+test_that("`char()` snapshot test", {
+  expect_snapshot({
+    char()
+  })
+})
+
+
+# vec_ptype_full ----------------------------------------------------------------------
+
+test_that("`vec_ptype_full()` snapshot test", {
+  expect_snapshot({
+    vec_ptype_full()
+  })
+})
+
+
+# vec_ptype_abbr ----------------------------------------------------------------------
+
+test_that("`vec_ptype_abbr()` snapshot test", {
+  expect_snapshot({
+    vec_ptype_abbr()
+  })
+})
+
+
+# format ------------------------------------------------------------------------------
+
+test_that("`format()` snapshot test", {
+  expect_snapshot({
+    format()
+  })
+})
+
+
+# set_char_opts -----------------------------------------------------------------------
+
+test_that("`set_char_opts()` snapshot test", {
+  expect_snapshot({
+    set_char_opts()
+  })
+})
+
+
+# vec_ptype2.pillar_char --------------------------------------------------------------
+
+test_that("`vec_ptype2.pillar_char()` snapshot test", {
+  expect_snapshot({
+    vec_ptype2.pillar_char()
+  })
+})
+
+
+# vec_ptype2.character ----------------------------------------------------------------
+
+test_that("`vec_ptype2.character()` snapshot test", {
+  expect_snapshot({
+    vec_ptype2.character()
+  })
+})
+
+
+# vec_cast.pillar_char ----------------------------------------------------------------
+
+test_that("`vec_cast.pillar_char()` snapshot test", {
+  expect_snapshot({
+    vec_cast.pillar_char()
+  })
+})
+
+
+# vec_cast.character ------------------------------------------------------------------
+
+test_that("`vec_cast.character()` snapshot test", {
+  expect_snapshot({
+    vec_cast.character()
+  })
+})

tests/testthat/test-compat-lifecycle.R

@@ -0,0 +1,70 @@
+# scoped_lifecycle_silence ------------------------------------------------------------
+
+test_that("`scoped_lifecycle_silence()` snapshot test", {
+  expect_snapshot({
+    scoped_lifecycle_silence()
+  })
+})
+
+
+# with_lifecycle_silence --------------------------------------------------------------
+
+test_that("`with_lifecycle_silence()` snapshot test", {
+  expect_snapshot({
+    with_lifecycle_silence()
+  })
+})
+
+
+# scoped_lifecycle_warnings -----------------------------------------------------------
+
+test_that("`scoped_lifecycle_warnings()` snapshot test", {
+  expect_snapshot({
+    scoped_lifecycle_warnings()
+  })
+})
+
+
+# with_lifecycle_warnings -------------------------------------------------------------
+
+test_that("`with_lifecycle_warnings()` snapshot test", {
+  expect_snapshot({
+    with_lifecycle_warnings()
+  })
+})
+
+
+# scoped_lifecycle_errors -------------------------------------------------------------
+
+test_that("`scoped_lifecycle_errors()` snapshot test", {
+  expect_snapshot({
+    scoped_lifecycle_errors()
+  })
+})
+
+
+# with_lifecycle_errors ---------------------------------------------------------------
+
+test_that("`with_lifecycle_errors()` snapshot test", {
+  expect_snapshot({
+    with_lifecycle_errors()
+  })
+})
+
+
+# signal_superseded -------------------------------------------------------------------
+
+test_that("`signal_superseded()` snapshot test", {
+  expect_snapshot({
+    signal_superseded()
+  })
+})
+
+
+# foreign_caller_env ------------------------------------------------------------------
+
+test_that("`foreign_caller_env()` snapshot test", {
+  expect_snapshot({
+    foreign_caller_env()
+  })
+})