tests/testthat/helper-type-sum.R

as_override_type_sum <- function(x) {
  structure(x, class = "override_type_sum")
}

type_sum.override_type_sum <- function(x, ...) {
  "SC"
}

registerS3method("type_sum", "override_type_sum", type_sum.override_type_sum)
Robertus100/tibble documentation built on May 9, 2019, 10:09 a.m.