Skip to content

Commit

Permalink
Add RCPP wraping to handle any possible errors
Browse files Browse the repository at this point in the history
  • Loading branch information
mattfidler committed Aug 28, 2024
1 parent a916cd8 commit 0f3bd0c
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions src/et.cpp
Original file line number Diff line number Diff line change
@@ -49,6 +49,7 @@ extern "C" SEXP getForder(void);
extern "C" int useForder(void);

extern "C" SEXP orderForderS1(SEXP ordIn) {
BEGIN_RCPP
Function order = getForder();
IntegerVector ord;
if (useForder()){
@@ -60,6 +61,7 @@ extern "C" SEXP orderForderS1(SEXP ordIn) {
_["method"]="radix");
}
return wrap(ord);
END_RCPP
}


0 comments on commit 0f3bd0c

Please sign in to comment.