| 48 | } |
| 49 | |
| 50 | inline SEXP Rcpp_list4(SEXP x0, SEXP x1, SEXP x2, SEXP x3) { |
| 51 | PROTECT(x0); |
| 52 | x0 = Rf_cons(x0, Rcpp_list3(x1, x2, x3)); |
| 53 | UNPROTECT(1); |
| 54 | return x0; |
| 55 | } |
| 56 | |
| 57 | inline SEXP Rcpp_list5(SEXP x0, SEXP x1, SEXP x2, SEXP x3, SEXP x4) { |
| 58 | PROTECT(x0); |
no test coverage detected