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))
})
Generated by dwww version 1.15 on Wed Jun 26 02:44:32 CEST 2024.