Uh oh!
There was an error while loading.Please reload this page.
- Notifications
You must be signed in to change notification settings - Fork219
Automatically register init functions for RcppModules (closes #704)#705
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to ourterms of service andprivacy statement. We’ll occasionally send you account related emails.
Already on GitHub?Sign in to your account
Uh oh!
There was an error while loading.Please reload this page.
Changes from1 commit
File filter
Filter by extension
Conversations
Uh oh!
There was an error while loading.Please reload this page.
Jump to
Uh oh!
There was an error while loading.Please reload this page.
Diff view
Diff view
- Loading branch information
Uh oh!
There was an error while loading.Please reload this page.
There are no files selected for viewing
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -138,18 +138,13 @@ Rcpp.package.skeleton <- function(name = "anRpackage", list = character(), | ||
| file.copy(file, src) | ||
| message(" >> copied ", file, " to src directory" ) | ||
| } | ||
| } | ||
| if (example_code) { | ||
| if (isTRUE(attributes)) { | ||
| file.copy(file.path( skeleton, "rcpp_hello_world_attributes.cpp"), | ||
| file.path( src, "rcpp_hello_world.cpp")) | ||
| message(" >> added example src file using Rcpp attributes") | ||
| } else { | ||
| header <- readLines(file.path(skeleton, "rcpp_hello_world.h")) | ||
| header <- gsub("@PKG@", name, header, fixed = TRUE) | ||
| @@ -218,6 +213,11 @@ Rcpp.package.skeleton <- function(name = "anRpackage", list = character(), | ||
| rm("rcpp_hello_world", envir = env) | ||
| } | ||
| if (attributes) { | ||
| compileAttributes(root) | ||
| message(" >> compiled Rcpp attributes ") | ||
| } | ||
Member
| ||
| invisible(NULL) | ||
| } | ||