tests/valgrind/run.R

# overwrite unitizer_sect to just plain eval stuff

unitizer_sect <- function(
  title = NULL, expr=expression(), details=character(), compare=identical
) {
  expr.sub <- substitute(expr)
  for(i in as.list(tail(expr.sub, -1L))) try(eval(i, envir=parent.frame()))
}

source('unitizer/_pre/lorem.R')
source('unitizer/cstringr.R')
brodieG/vetr documentation built on Aug. 19, 2018, 12:35 a.m.