if (FALSE) {
if (supportsAVX()) {
Sys.setenv(PKG_CPPFLAGS = getAVXFlags())
Rcpp::sourceCpp(verbose = TRUE, code='
// [[Rcpp::plugins(cpp14)]]
// [[Rcpp::depends(RcppXsimd)]]
#include
#include "xsimd/xsimd.hpp"
// [[Rcpp::export]]
void demoAVX() {
xsimd::batch a(1.0);
xsimd::batch b(1.0);
Rcpp::Rcout << a << " + " << b << " = " << (a + b) << std::endl;
}')
demoAVX()
} else {
message("AVX is not supported")
}
}
Run the code above in your browser using DataLab