custom finalizer

gistfile1.cpp

#include <Rcpp.h>
using namespace Rcpp;

void finalizeInt(int* ptr) {
    // do nothing
}

typedef XPtr<int,PreserveStorage,finalizeInt> XPtrInt;

// [[Rcpp::export]]
XPtrInt test() {
    return XPtrInt(new int(10)); 
}

Thanks for this! I've been trying to get custom finalizers working for the past hour, and the PreserveStorage was all I needed! I suspect you also need to have the true flag for set_delete_finalizer.

XPtr<Node, PreserveStorage, finalizeInt> ptr(new int(10), true);