tests/testthat/helper-hybrid.R

expect_hybrid <- function(data, expr, info = NULL, label = NULL) {
  expect_true(hybrid_impl(data, enquo(expr), rlang::caller_env()), info = info, label = label)
}

expect_not_hybrid <- function(data, expr, info = NULL, label = NULL) {
  expect_false(hybrid_impl(data, enquo(expr), rlang::caller_env()), info = info, label = label)
}

Try the dplyr package in your browser

Any scripts or data that you put into this service are public.

dplyr documentation built on July 4, 2019, 5:08 p.m.