示例#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]]
void connection_release(XPtr<MyConnectionPtr> con) {
  if ((*con)->hasQuery()) {
    warning("%s\n%s",
      "There is a result object still in use.",
      "The connection will be automatically released when it is closed"
    );
  }
  return con.release();
}
示例#3
0
// [[Rcpp::export]]
void result_release(XPtr<PqResult> rs) {
  rs.release();
}
示例#4
0
文件: XPtr.cpp 项目: LanceAtKS/LC
// [[Rcpp::export]]
bool xptr_release( XPtr< std::vector<int> > p) {
    p.release();
    return !p;
}