From db0755d027f0f88568909e16b715c8e769333390 Mon Sep 17 00:00:00 2001 From: Gertjan van den Burg Date: Fri, 15 Dec 2017 17:25:50 -0500 Subject: fix warnings from R about routine registration --- src/syncrng.c | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) diff --git a/src/syncrng.c b/src/syncrng.c index 8957047..8a0b5b4 100644 --- a/src/syncrng.c +++ b/src/syncrng.c @@ -11,6 +11,7 @@ #include #include #include +#include #endif /** @@ -221,6 +222,24 @@ initsyncrng(void) * */ +SEXP R_syncrng_seed(SEXP seed); +SEXP R_syncrng_rand(SEXP state); + +R_CallMethodDef callMethods[] = { + {"R_syncrng_seed", (DL_FUNC) &R_syncrng_seed, 1}, + {"R_syncrng_rand", (DL_FUNC) &R_syncrng_seed, 1}, + {NULL, NULL, 0} +}; +R_CMethodDef cMethods[] = { + {NULL, NULL, 0} +}; + +void R_init_myLib(DllInfo *info) +{ + R_registerRoutines(info, cMethods, callMethods, NULL, NULL); + R_useDynamicSymbols(info, TRUE); +} + // Set the seed for the generator from the reference class SEXP R_syncrng_seed(SEXP seed) { -- cgit v1.2.3