From 55075ba13a08525104da3410a0559ea80bf38970 Mon Sep 17 00:00:00 2001 From: Takeshi Enomoto Date: Sun, 25 Feb 2024 11:29:31 +0900 Subject: [PATCH] FreeBSD support --- R/utils.R | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/R/utils.R b/R/utils.R index 9764ec36..17483c35 100644 --- a/R/utils.R +++ b/R/utils.R @@ -54,6 +54,10 @@ os_is_linux <- function() { isTRUE(Sys.info()[["sysname"]] == "Linux") } +os_is_freebsd <- function() { + isTRUE(Sys.info()[["sysname"]] == "FreeBSD") +} + is_rtools43_toolchain <- function() { os_is_windows() && R.version$major == "4" && R.version$minor >= "3.0" } @@ -87,6 +91,8 @@ is_rosetta2 <- function() { make_cmd <- function() { if (os_is_windows() && !os_is_wsl()) { "mingw32-make.exe" + } else if (os_is_freebsd()) { + "gmake" } else { "make" } @@ -677,7 +683,7 @@ assert_file_exists <- checkmate::makeAssertionFunction(check_file_exists) get_cmdstan_flags <- function(flag_name) { cmdstan_path <- cmdstanr::cmdstan_path() flags <- wsl_compatible_run( - command = "make", + command = make_cmd(), args = c("-s", paste0("print-", flag_name)), wd = cmdstan_path )$stdout