Update cpp11.cpp

rnabioco · Jan 21, 2025 · 93ecbe1 · 93ecbe1
1 parent 5d5b31f
commit 93ecbe1
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/cpp11.cpp b/src/cpp11.cpp
@@ -8,10 +8,10 @@ using namespace Rcpp;
 #include <R_ext/Visibility.h>
 
 // random.cpp
-writable::data_frame random_impl(data_frame genome, int length, int n, int seed);
+writable::data_frame random_impl(data_frame genome, double length, int n, int seed);
 extern "C" SEXP _valr_random_impl(SEXP genome, SEXP length, SEXP n, SEXP seed) {
   BEGIN_CPP11
-    return cpp11::as_sexp(random_impl(cpp11::as_cpp<cpp11::decay_t<data_frame>>(genome), cpp11::as_cpp<cpp11::decay_t<int>>(length), cpp11::as_cpp<cpp11::decay_t<int>>(n), cpp11::as_cpp<cpp11::decay_t<int>>(seed)));
+    return cpp11::as_sexp(random_impl(cpp11::as_cpp<cpp11::decay_t<data_frame>>(genome), cpp11::as_cpp<cpp11::decay_t<double>>(length), cpp11::as_cpp<cpp11::decay_t<int>>(n), cpp11::as_cpp<cpp11::decay_t<int>>(seed)));
   END_CPP11
 }