tests/testthat/test-inject-funs.R

test_that("can inject functons into evaluation context", {
  old <- inject_funs(f = function() 1)
  defer(inject_funs(old))

  ev <- evaluate("f()")
  expect_equal(ev[[2]], "[1] 1\n")
})
r-lib/evaluate documentation built on June 10, 2025, 5:24 p.m.