fix: skip CRAN failing tests on macos x86_64

ThinkR-open · Jan 16, 2025 · 2cd8123 · 2cd8123
1 parent ca6a33e
commit 2cd8123
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/dev/flat_create_flat.Rmd b/dev/flat_create_flat.Rmd
@@ -4,7 +4,7 @@ output: html_document
 editor_options: 
   chunk_output_type: console
 inflate:
-    state: deprecated?
+    state: active
 ---
 
 ```{r development, include=FALSE}
@@ -632,6 +632,7 @@ for (template in all_templates) {
     expect_true(sum(grepl(paste0("fusen::inflate\\(flat_file = \"dev/flat_", main_flat_file_name, ".Rmd\""), flat_lines)) == 1)
 
     withr::with_dir(dummypackage4, {
+      skip_on_os(os = "mac", arch = "x86_64")
       inflate_command <- paste0("fusen::inflate(flat_file = \"dev/flat_", main_flat_file_name, ".Rmd\", open_vignette = FALSE, check = FALSE)")
       expect_error(suppressMessages(eval(parse(text = inflate_command))), regexp = NA)
     })
@@ -640,6 +641,7 @@ for (template in all_templates) {
   # Now try to inflates a second time
   test_that("flat file inflates a second time", {
     withr::with_dir(dummypackage4, {
+      skip_on_os(os = "mac", arch = "x86_64")
       inflate_command_second <- paste0("fusen::inflate(flat_file = \"dev/flat_", main_flat_file_name, ".Rmd\", open_vignette = FALSE, check = FALSE, overwrite = TRUE)")
       expect_error(suppressMessages(eval(parse(text = inflate_command_second))), regexp = NA)
     })

diff --git a/tests/testthat/test-add_flat_template.R b/tests/testthat/test-add_flat_template.R
@@ -337,6 +337,7 @@ for (template in all_templates) {
     expect_true(sum(grepl(paste0("fusen::inflate\\(flat_file = \"dev/flat_", main_flat_file_name, ".Rmd\""), flat_lines)) == 1)
 
     withr::with_dir(dummypackage4, {
+      skip_on_os(os = "mac", arch = "x86_64")
       inflate_command <- paste0("fusen::inflate(flat_file = \"dev/flat_", main_flat_file_name, ".Rmd\", open_vignette = FALSE, check = FALSE)")
       expect_error(suppressMessages(eval(parse(text = inflate_command))), regexp = NA)
     })
@@ -345,6 +346,7 @@ for (template in all_templates) {
   # Now try to inflates a second time
   test_that("flat file inflates a second time", {
     withr::with_dir(dummypackage4, {
+      skip_on_os(os = "mac", arch = "x86_64")
       inflate_command_second <- paste0("fusen::inflate(flat_file = \"dev/flat_", main_flat_file_name, ".Rmd\", open_vignette = FALSE, check = FALSE, overwrite = TRUE)")
       expect_error(suppressMessages(eval(parse(text = inflate_command_second))), regexp = NA)
     })