use stanc.js from exec/

stan-dev · Sep 8, 2023 · 8543903 · 8543903
1 parent fa1969e
commit 8543903
Show file tree

Hide file tree

Showing 2 changed files with 27,135 additions and 1 deletion.
diff --git a/rstan/rstan/R/zzz.R b/rstan/rstan/R/zzz.R
@@ -21,7 +21,7 @@ OUT <- 0
 
 .onLoad <- function(libname, pkgname) {
   assign("stanc_ctx", QuickJSR::JSContext$new(stack_size = 4 * 1024 * 1024), envir = topenv())
-  stanc_js <- system.file("stanc.js", package = "StanHeaders")
+  stanc_js <- system.file("exec", "stanc.js", package = "rstan", mustWork = TRUE)
   stanc_ctx$source(stanc_js)
   assignInMyNamespace("rstan_load_time", value = Sys.time())
   set_rstan_ggplot_defaults()

diff --git a/rstan/rstan/exec/stanc.js b/rstan/rstan/exec/stanc.js