| 31 | PreserveStorage() : data(R_NilValue), token(R_NilValue){} |
| 32 | |
| 33 | ~PreserveStorage(){ |
| 34 | Rcpp_PreciousRelease(token) ; |
| 35 | data = R_NilValue; |
| 36 | token = R_NilValue; |
| 37 | } |
| 38 | |
| 39 | inline void set__(SEXP x){ |
| 40 | if (data != x) { |
nothing calls this directly
no test coverage detected