Fix tests

mrc-ide · Nov 13, 2024 · ffe1d1d · ffe1d1d
1 parent 188607c
commit ffe1d1d
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 9 deletions.
diff --git a/tests/testthat/test-parse-expr.R b/tests/testthat/test-parse-expr.R
@@ -269,14 +269,6 @@ test_that("interpolate calls must be assigned to a symbol", {
 })
 
 
-test_that("delays not yet supported", {
-  expect_error(
-    parse_expr(quote(a <- delay(b, 1)), NULL, NULL),
-    "'delay()' is not implemented yet",
-    fixed = TRUE)
-})
-
-
 test_that("Reject unclassifiable expressions", {
   expect_error(
     parse_expr(quote(a), NULL, NULL),

diff --git a/tests/testthat/test-parse-system.R b/tests/testthat/test-parse-system.R
@@ -310,5 +310,5 @@ test_that("parse a very simple delay", {
   expect_true(dat$delays$in_rhs)
   expect_false(dat$delays$in_output)
   expect_equal(dat$delays$by, I(list(1)))
-  expect_equal(dat$delays$value, I(list(variables = "x")))
+  expect_equal(dat$delays$value, I(list(list(variables = "x"))))
 })