R Under development (unstable) (2024-08-16 r87026 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2024 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(testthat)
> library(exampletestr)
> 
> get_os <- function() {
+   sysinf <- Sys.info()
+   if (!is.null(sysinf)) {
+     os <- sysinf["sysname"]
+     if (os == "Darwin") {
+       os <- "osx"
+     }
+   } else { ## mystery machine
+     os <- .Platform$OS.type
+     if (grepl("^darwin", R.version$os)) {
+       os <- "osx"
+     }
+     if (grepl("linux-gnu", R.version$os)) {
+       os <- "linux"
+     }
+   }
+   if (os == "osx") os <- "mac"
+   tolower(os)
+ }
> 
> if (get_os() != "mac" || Sys.getenv("NOT_CRAN") == "true") {
+   test_check("exampletestr")
+ }
[ FAIL 0 | WARN 0 | SKIP 1 | PASS 27 ]

══ Skipped tests (1) ═══════════════════════════════════════════════════════════
• On CRAN (1): 'test-example-extraction.R:15:3'

[ FAIL 0 | WARN 0 | SKIP 1 | PASS 27 ]
> 
> proc.time()
   user  system elapsed 
   9.26    2.29   11.17