[[Rcpp::register]]
| 99 | static SEXP Rcpp_precious = R_NilValue; |
| 100 | // [[Rcpp::register]] |
| 101 | void Rcpp_precious_init() { |
| 102 | Rcpp_precious = CONS(R_NilValue, R_NilValue); // set up |
| 103 | R_PreserveObject(Rcpp_precious); // and protect |
| 104 | } |
| 105 | // [[Rcpp::register]] |
| 106 | void Rcpp_precious_teardown() { // #nocov start |
| 107 | R_ReleaseObject(Rcpp_precious); // release resource |