chore: Clean up tests

tests/testthat/_snaps/compat-lifecycle.md

@@ -0,0 +1,29 @@
+# `scoped_lifecycle_silence()` snapshot test
+
+    Code
+      scoped_lifecycle_silence()
+
+# `scoped_lifecycle_warnings()` snapshot test
+
+    Code
+      scoped_lifecycle_warnings()
+
+# `scoped_lifecycle_errors()` snapshot test
+
+    Code
+      scoped_lifecycle_errors()
+
+# `signal_superseded()` snapshot test
+
+    Code
+      signal_superseded()
+    Output
+      NULL
+
+# `foreign_caller_env()` snapshot test
+
+    Code
+      foreign_caller_env()
+    Output
+      <environment: 0x11296c7d8>
+

tests/testthat/_snaps/compat-purrr.md

@@ -0,0 +1,8 @@
+# `negate()` snapshot test
+
+    Code
+      negate()
+    Output
+      function(...) !.p(...)
+      <environment: 0x1371d6510>
+

tests/testthat/_snaps/dim.md

@@ -0,0 +1,7 @@
+# `mult_sign()` snapshot test
+
+    Code
+      mult_sign()
+    Output
+      [1] "x"
+

tests/testthat/_snaps/empty-data.md

@@ -0,0 +1,15 @@
+# `style_empty()` snapshot test
+
+    Code
+      style_empty()
+    Output
+      [1] ""
+
+# `new_empty_shaft()` snapshot test
+
+    Code
+      new_empty_shaft()
+    Output
+      <pillar_ornament>
+      
+

tests/testthat/_snaps/ggplot2.md

@@ -0,0 +1,27 @@
+# `scale_x_num()` snapshot test
+
+    Code
+      scale_x_num()
+    Output
+      <ScaleContinuousPositionNum>
+       Range:  
+       Limits:    0 --    1
+
+# `scale_y_num()` snapshot test
+
+    Code
+      scale_y_num()
+    Output
+      <ScaleContinuousPositionNum>
+       Range:  
+       Limits:    0 --    1
+
+# `MakeScaleContinuousPositionNum()` snapshot test
+
+    Code
+      MakeScaleContinuousPositionNum()
+    Output
+      <ScaleContinuousPositionNum>
+       Range:  
+       Limits:    0 --    1
+

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.pillar_capital ---------------------------------------------------------------
+
+test_that("`format.pillar_capital()` snapshot test", {
+  expect_snapshot({
+    format()
+  })
+})

tests/testthat/test-char.R

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

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()
+  })
+})