tests/testthat/test-names.R

context("names")

test_that("auto_name does not truncate symbols (#19)", {
  long_name <- quote(AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA)
  dots <- as.lazy_dots(long_name)

  expect_equal(auto_names(dots), as.character(long_name))
})

Try the lazyeval package in your browser

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

lazyeval documentation built on May 2, 2019, 2:11 a.m.