tests/testthat/helper.R

In nofrills: Low-Cost Anonymous Functions

# As of testthat 1.0.2.9000, objects are captured as quosures by `expect_*()`.
# This causes spurious test failures, due to a bug in `rlang::enquo()`
# (https://github.com/tidyverse/rlang/issues/280) and its inability to
# comprehend literal unquoting operators
# (cf. https://github.com/tidyverse/rlang/issues/264).

expect_equal_ <- function(object, expected, ...) {
  force(object)
  force(expected)
  expect_equal(object, expected, ...)
}