Skip to content

Commit

Permalink
code style
Browse files Browse the repository at this point in the history
  • Loading branch information
shikokuchuo committed Sep 11, 2024
1 parent 0a03845 commit 2724162
Showing 1 changed file with 4 additions and 7 deletions.
11 changes: 4 additions & 7 deletions src/shikokuchuo.c
Original file line number Diff line number Diff line change
Expand Up @@ -43,11 +43,8 @@ SEXP ichimoku_int_zero;
SEXP ichimoku_int_three;
SEXP ichimoku_false;

typedef SEXP (*one_fun) (SEXP);
typedef SEXP (*twelve_fun) (SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);

one_fun naofun;
twelve_fun jsofun;
SEXP (*naofun)(SEXP);
SEXP (*jsofun)(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP);

// rolling max over a window
SEXP _wmax(SEXP x, SEXP window) {
Expand Down Expand Up @@ -354,8 +351,8 @@ static void RegisterSymbols(void) {
ichimoku_PeriodsSymbol = Rf_install("periods");
ichimoku_PeriodicitySymbol = Rf_install("periodicity");
ichimoku_TickerSymbol = Rf_install("ticker");
naofun = (one_fun) R_GetCCallable("xts", "na_omit_xts");
jsofun = (twelve_fun) R_GetCCallable("RcppSimdJson", "_RcppSimdJson_.deserialize_json");
naofun = (SEXP (*)(SEXP)) R_GetCCallable("xts", "na_omit_xts");
jsofun = (SEXP (*)(SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP, SEXP)) R_GetCCallable("RcppSimdJson", "_RcppSimdJson_.deserialize_json");
}

static void PreserveObjects(void) {
Expand Down

0 comments on commit 2724162

Please sign in to comment.