Function takeLogRcppLocation

inst/tinytest/cpp/exceptions.cpp:50–55

[[Rcpp::export]]

// [[Rcpp::export]]
double takeLogRcppLocation(double val) {
    if (val <= 0.0) {
        throw Rcpp::exception("Inadmissible value", "exceptions.cpp", 44);
    }
    return log(val);
}

double f1(double val) {
    return takeLogRcppLocation(val);