Function Module__invoke

src/module.cpp:126–135

}

SEXP Module__invoke(SEXP args) {						// #nocov start
BEGIN_RCPP
    SEXP p = CDR(args);
    XP_Module module(CAR(p)); p = CDR(p);
    std::string fun = Rcpp::as<std::string>(CAR(p)); p = CDR(p);

    UNPACK_EXTERNAL_ARGS(cargs,p)
    return module->invoke(fun, cargs, nargs);
END_RCPP
}														// #nocov end

SEXP class__newInstance(SEXP args) {
    SEXP p = CDR(args);