add Rcpp structure for #9

Author: mpadge

DESCRIPTION

@@ -17,14 +17,18 @@ Imports:
     httr2,
     memoise,
     pbapply,
+    Rcpp,
     tokenizers
 Suggests:
     rappdirs,
     httptest2,
     roxygen2,
     testthat (>= 3.0.0),
     withr
+LinkingTo:
+    Rcpp
 Depends: R (>= 3.5.0)
+NeedsCompilation: yes
 Encoding: UTF-8
 Language: en-GB
 Roxygen: list(markdown = TRUE)

NAMESPACE

@@ -8,4 +8,6 @@ export(pkgsimil_load_data)
 export(pkgsimil_similar_fns)
 export(pkgsimil_similar_pkgs)
 export(text_is_code)
+importFrom(Rcpp,sourceCpp)
 importFrom(memoise,memoise)
+useDynLib(pkgsimil, .registration = TRUE)

R/RcppExports.R

@@ -0,0 +1,6 @@
+# Generated by using Rcpp::compileAttributes() -> do not edit by hand
+# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
+
+rcpp_bm25 <- function (idfs, tokens, tokens_i) {
+    .Call (`_pkgsimil_rcpp_bm25`, idfs, tokens, tokens_i)
+}

R/pkgsimil-package.R

@@ -6,5 +6,7 @@
 # The following block is used by usethis to automatically manage
 # roxygen namespace tags. Modify with care!
 ## usethis namespace: start
+#' @importFrom Rcpp sourceCpp
+#' @useDynLib pkgsimil, .registration = TRUE
 ## usethis namespace: end
 NULL

src/.gitignore

@@ -0,0 +1,3 @@
+*.o
+*.so
+*.dll

src/RcppExports.cpp

@@ -0,0 +1,35 @@
+// Generated by using Rcpp::compileAttributes() -> do not edit by hand
+// Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
+
+#include <Rcpp.h>
+
+using namespace Rcpp;
+
+#ifdef RCPP_USE_GLOBAL_ROSTREAM
+Rcpp::Rostream<true>&  Rcpp::Rcout = Rcpp::Rcpp_cout_get();
+Rcpp::Rostream<false>& Rcpp::Rcerr = Rcpp::Rcpp_cerr_get();
+#endif
+
+// rcpp_bm25
+Rcpp::List rcpp_bm25(const Rcpp::DataFrame& idfs, const Rcpp::List& tokens, Rcpp::DataFrame& tokens_i);
+RcppExport SEXP _pkgsimil_rcpp_bm25(SEXP idfsSEXP, SEXP tokensSEXP, SEXP tokens_iSEXP) {
+BEGIN_RCPP
+    Rcpp::RObject rcpp_result_gen;
+    Rcpp::RNGScope rcpp_rngScope_gen;
+    Rcpp::traits::input_parameter< const Rcpp::DataFrame& >::type idfs(idfsSEXP);
+    Rcpp::traits::input_parameter< const Rcpp::List& >::type tokens(tokensSEXP);
+    Rcpp::traits::input_parameter< Rcpp::DataFrame& >::type tokens_i(tokens_iSEXP);
+    rcpp_result_gen = Rcpp::wrap(rcpp_bm25(idfs, tokens, tokens_i));
+    return rcpp_result_gen;
+END_RCPP
+}
+
+static const R_CallMethodDef CallEntries[] = {
+    {"_pkgsimil_rcpp_bm25", (DL_FUNC) &_pkgsimil_rcpp_bm25, 3},
+    {NULL, NULL, 0}
+};
+
+RcppExport void R_init_pkgsimil(DllInfo *dll) {
+    R_registerRoutines(dll, NULL, CallEntries, NULL, NULL);
+    R_useDynamicSymbols(dll, FALSE);
+}

src/bm25.cpp

@@ -0,0 +1,6 @@
+#include "bm25.h"
+
+// [[Rcpp::export]]
+Rcpp::List rcpp_bm25 (const Rcpp::DataFrame &idfs, const Rcpp::List &tokens, Rcpp::DataFrame &tokens_i) {
+    return Rcpp::List();
+}

src/bm25.h

@@ -0,0 +1,5 @@
+#pragma once
+
+#include <Rcpp.h>
+
+Rcpp::List rcpp_bm25 (const Rcpp::DataFrame &idfs, const Rcpp::List &tokens, Rcpp::DataFrame &tokens_i);