Is there a way to check the arity of Rcpp::Function?

Question

I need to check the arity of a function in an Rcpp block at run time. What I would like to do is something akin to the following:

double loglikelihood(Rcpp::L