[[Rcpp::export]]
| 60 | |
| 61 | // [[Rcpp::export]] |
| 62 | SEXP evaluator_error() { |
| 63 | return Rcpp_fast_eval(Rf_lang2(Rf_install("stop"), Rf_mkString("boom")), R_GlobalEnv); |
| 64 | } |
| 65 | |
| 66 | // [[Rcpp::export]] |
| 67 | SEXP evaluator_ok(SEXP x) { |
nothing calls this directly
no test coverage detected