示例#1
0
文件: XPtr.cpp 项目: LanceAtKS/LC
// [[Rcpp::export]]
bool xptr_access_released( XPtr< std::vector<int> > p) {

    // double-release should be a no-op
    p.release();

    // get should return NULL
    return p.get() == NULL;
}
示例#2
0
// [[Rcpp::export]]
bool connection_valid(XPtr<MyConnectionPtr> con) {
  return con.get() != NULL;
}
示例#3
0
// [[Rcpp::export]]
bool result_active(XPtr<PqResult> rs) {
  return rs.get() != NULL && rs->active();
}