/usr/lib/R/site-library/dplyr/include/dplyr/workarounds/xlen.h is in r-cran-dplyr 0.7.4-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | #ifndef DPLYR_WORKAROUND_XLEN_H
#define DPLYR_WORKAROUND_XLEN_H
#ifdef LONG_VECTOR_SUPPORT
namespace Rcpp {
template <>
inline SEXP wrap(const R_xlen_t& x) {
if (x < -R_SHORT_LEN_MAX || x > R_SHORT_LEN_MAX) {
return Rf_ScalarReal(static_cast<double>(x));
}
else {
return Rf_ScalarInteger(static_cast<int>(x));
}
}
}
#endif
#endif
|