将 expect_snapshot_value( ..., "deparse") 与调用对象一起使用

问题描述

也许这是有意为之，但我正在尝试将 testthat e3 与具有“调用”对象并遇到问题的对象一起使用。

要制作一个 reprex，我们只需要在 RStudio 中创建一个新包，运行 usethis::use_testthat(); usethis::use_test("hello") 并在测试文件中写入。

test_that("can snapshot a call",{
  a_new_function <- function() {
    match.call()
  }
  expect_snapshot_value(
    a_new_function(),"deparse"
  )
})

如果我们然后运行测试我得到

Error (test-hello.R:5:3): can snapshot a call
Error: Could not find function "a_new_function"

不知何故，在解析和阅读解析后的文本后，调用运行起来，但我不知道为什么。 如果我对 "serialize" 使用 "deparse" 而不是 style，那么我没有问题。

这是一个错误吗？我不应该这样做吗？我觉得我对 deparse 不太了解。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）