Merge pull request #300 from mrc-ide/mrc-4446

Author: richfitz

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: odin
 Title: ODE Generation and Integration
-Version: 1.5.5
+Version: 1.5.6
 Authors@R: c(person("Rich", "FitzJohn", role = c("aut", "cre"),
                     email = "rich.fitzjohn@gmail.com"),
              person("Thibaut", "Jombart", role = "ctb"),

R/js.R

@@ -116,6 +116,9 @@ odin_js_wrapper_continuous <- function(res) {
                      use_names = TRUE, return_statistics = FALSE) {
         t_js <- to_json_js(t, auto_unbox = FALSE)
         y_js <- to_json_js(y, auto_unbox = FALSE, null = "null")
+        if (!is.null(tcrit)) {
+          tcrit <- I(tcrit)
+        }
         control <- list(atol = atol,
                         rtol = rtol,
                         tcrit = tcrit,

inst/js/dust.js

@@ -176,6 +176,7 @@ test_that_odin("linear", {
   expect_error(mod$run(c(tt, max(tp) + 1)),
                "Integration times do not span interpolation range")
 
+  skip_for_target("js", "has better tcrit support")
   expect_error(mod$run(tt, tcrit = 3),
                "Interpolation failed as .+ is out of range")
 })