Merge pull request #125 from stan-dev/fix-rng-error

Fix stanfunctions failures with new Stan RNG
stan-dev · Apr 26, 2024 · 2010d4b · 2010d4b
2 parents dc83777 + 0ffaf33
commit 2010d4b
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 2 deletions.
diff --git a/.github/workflows/check-standalone.yaml b/.github/workflows/check-standalone.yaml
@@ -73,11 +73,19 @@ jobs:
           rcmdcheck::rcmdcheck(path = "lgpr", args = c("--no-manual", "--as-cran"), build_args = "--no-manual")
         shell: Rscript {0}
 
+      - name: Checkout RStan Experimental branch
+        uses: actions/checkout@v3
+        with:
+          repository: stan-dev/rstan
+          ref: experimental
+          path: rstan
+          submodules: 'recursive'
+
       - name: Install Experimental StanHeaders and Experimental RStan
         run: |
           Sys.setenv(MAKEFLAGS=paste0("-j",parallel::detectCores()))
-          remotes::install_github("stan-dev/rstan@experimental", subdir="StanHeaders")
-          remotes::install_github("stan-dev/rstan@experimental", subdir="rstan/rstan")
+          install.packages("rstan/StanHeaders", type = "source", repos = NULL)
+          install.packages("rstan/rstan/rstan", type = "source", repos = NULL)
         shell: Rscript {0}
 
       - name: Check against Experimental StanHeaders and Experimental RStan

diff --git a/R/rstan_config.R b/R/rstan_config.R
@@ -236,6 +236,9 @@ rstan_config <- function(pkgdir = ".") {
     } else {
       cppcode <- c("#include <rstan/rstaninc.hpp>", cppcode)
     }
+    if (utils::packageVersion('StanHeaders') >= "2.34") {
+      cppcode <- gsub("boost::ecuyer1988", "stan::rng_t", cppcode, fixed = TRUE)
+    }
     # Stan header file
     hdr_name <- .stan_prefix(model_name, ".h")
     # get license file (if any)