tests/regression-tests.R

library(histry)
stopifnot(inherits(get("evaluate_call", asNamespace("evaluate")), "functionWithTrace"))
evaltracer(FALSE)
stopifnot(!inherits(get("evaluate_call", asNamespace("evaluate")),"functionWithTrace"))
evaltracer(TRUE)
stopifnot(inherits(get("evaluate_call", asNamespace("evaluate")), "functionWithTrace"))

Try the histry package in your browser

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

histry documentation built on May 2, 2019, 8:51 a.m.