Gave up for now. I hate this.

aadler · Jan 25, 2024 · 128fb90 · 128fb90
1 parent 2e7f877
commit 128fb90
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/inst/tinytest/test_MiniMaxApprox.R b/inst/tinytest/test_MiniMaxApprox.R
@@ -141,7 +141,7 @@ expect_warning(minimaxApprox(sin, 0, pi / 4, c(1L, 1L), TRUE), wrnMess)
 ## servers do not get the Zero basis error. Probably BLAS related, so I will
 ## only run this at home.
 xi <- c(-pi, -2.85, -2.07, -pi / 2, -0.77, -0.2, 0)
-if ("windows" %in% tolower(Sys.info()[["sysname"]])) {
+if (Sys.info()["nodename"] == "HOME") {
   expect_warning(minimaxApprox(fn, -pi, 0, c(1, 4), TRUE, xi = xi), wrnMess)
 }