File tree Expand file tree Collapse file tree 1 file changed +9
-8
lines changed
Expand file tree Collapse file tree 1 file changed +9
-8
lines changed Original file line number Diff line number Diff line change 1- # Copyright (C) 2009 - 2011 Dirk Eddelbuettel and Romain Francois
1+ # Copyright (C) 2009 - 2013 Dirk Eddelbuettel and Romain Francois
22#
33# This file is part of Rcpp.
44#
@@ -21,8 +21,8 @@ Rcpp.plugin.maker <- function(
2121 LinkingTo = unique( c( package , " Rcpp" ) ),
2222 Depends = unique( c( package , " Rcpp" ) ),
2323 libs = " " ,
24- Makevars = readLines( system.file( " skeleton " , " Makevars " , package = package ) ) ,
25- Makevars.win = readLines( system.file( " skeleton " , " Makevars.win " , package = package ) ) ,
24+ Makevars = NULL ,
25+ Makevars.win = NULL ,
2626 package = " Rcpp"
2727){
2828 function ( ... ){
@@ -41,17 +41,18 @@ includes <- sprintf( "%s
4141using namespace Rcpp;
4242" , include.before , include.after )
4343
44- list (
45- env = list ( PKG_LIBS = paste( libs , Rcpp :: RcppLdFlags() ) ),
44+ out <- list (
45+ env = list ( PKG_LIBS = libs ),
4646 includes = includes ,
4747 LinkingTo = LinkingTo ,
4848 body = function ( x ){
4949 sprintf( " BEGIN_RCPP\n %s\n END_RCPP" , x )
5050 },
51- Depends = Depends ,
52- Makevars = Makevars ,
53- Makevars.win = Makevars.win
51+ Depends = Depends
5452 )
53+ if ( ! is.null(Makevars ) ) out $ Makevars <- Makevars
54+ if ( ! is.null(Makevars.win ) ) out $ Makevars.win <- Makevars.win
55+ out
5556}
5657}
5758
You can’t perform that action at this time.
0 commit comments