Function clone

inst/include/Rcpp/clone.h:33–37

   - T has a SEXP constructor
*/
template <typename T> T clone(const T& object) {
    Shield<SEXP> x(const_cast<T&>(object));
    Shield<SEXP> copy(Rf_duplicate(x));
    return T((SEXP)copy);
}

} // namespace Rcpp