| 187 | } |
| 188 | |
| 189 | SEXP arrow_attributes(SEXP x, bool only_top_level) { |
| 190 | SEXP call = PROTECT( |
| 191 | Rf_lang3(arrow::r::symbols::arrow_attributes, x, Rf_ScalarLogical(only_top_level))); |
| 192 | SEXP att = Rf_eval(call, arrow::r::ns::arrow); |
| 193 | UNPROTECT(1); |
| 194 | return att; |
| 195 | } |
| 196 | |
| 197 | cpp11::writable::list CollectColumnMetadata(SEXP lst, int num_fields) { |
| 198 | // Preallocate for the lambda to fill in |
no outgoing calls
no test coverage detected