skip R6 tests

Appsilon · Oct 2, 2023 · 3f3f0e5 · 3f3f0e5
1 parent f17cd5b
commit 3f3f0e5
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/tests/testthat/Testbox/tests/testthat/test-moduleR6.R b/tests/testthat/Testbox/tests/testthat/test-moduleR6.R
@@ -7,13 +7,15 @@ box::use(
 )
 
 test_that("TestR6 class can be instantiated", {
+  skip_if(is_r_devel())
   t1 <- moduleR6$TestR6$new() # nolint
 
   expect_s3_class(t1, "R6")
   expect_s3_class(t1, "TestR6")
   })
 
 test_that("TestR6 Methods can be evaluated", {
+  skip_if(is_r_devel())
   t1 <- moduleR6$TestR6$new() # nolint
 
   expect_equal(t1$show(), 4)

diff --git a/tests/testthat/Testbox_attached_modules_functions/tests/testthat/test-attached_R6.R b/tests/testthat/Testbox_attached_modules_functions/tests/testthat/test-attached_R6.R
@@ -7,13 +7,15 @@ box::use(
 )
 
 test_that("TestR6 class can be instantiated", {
+  skip_if(is_r_devel())
   t1 <- TestR6$new() # nolint
 
   expect_s3_class(t1, "R6")
   expect_s3_class(t1, "TestR6")
 })
 
 test_that("TestR6 Methods can be evaluated", {
+  skip_if(is_r_devel())
   t1 <- TestR6$new() # nolint
 
   expect_equal(t1$show(), 4)