[[Rcpp::export]]
| 880 | |
| 881 | // [[Rcpp::export]] |
| 882 | bool CharacterVector_test_equality_crosspolicy(CharacterVector x, Vector<STRSXP,NoProtectStorage> y) { |
| 883 | if (x.length() != y.length()) { |
| 884 | return false; |
| 885 | } |
| 886 | |
| 887 | return std::equal(x.begin(), x.end(), y.begin()); |
| 888 | } |
| 889 | |
| 890 | // [[Rcpp::export]] |
| 891 | double NumericVector_test_out_of_bounds_read(NumericVector v, R_xlen_t i) { |