Method ~Shield

inst/include/Rcpp/protection/Shield.h:38–40

    public:
        Shield( SEXP t_) : t(Rcpp_protect(t_)){}
        ~Shield(){
            if( t != R_NilValue ) Rcpp_unprotect(1) ;
        }

        operator SEXP() const { return t; }
        SEXP t ;