[Rcpp-commits] r4212 - in pkg/Rcpp: . R

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Tue Jan 15 14:36:30 CET 2013


Author: jjallaire
Date: 2013-01-15 14:36:30 +0100 (Tue, 15 Jan 2013)
New Revision: 4212

Modified:
   pkg/Rcpp/ChangeLog
   pkg/Rcpp/R/RcppLdpath.R
Log:
don't quote paths on windows

Modified: pkg/Rcpp/ChangeLog
===================================================================
--- pkg/Rcpp/ChangeLog	2013-01-15 02:36:44 UTC (rev 4211)
+++ pkg/Rcpp/ChangeLog	2013-01-15 13:36:30 UTC (rev 4212)
@@ -1,3 +1,7 @@
+2014-01-15  JJ Allaire <jj at rstudio.org>
+
+        ** R/RcppLdpath.R: don't quote paths on windows
+
 2014-01-14  JJ Allaire <jj at rstudio.org>
 
         * DESCRIPTION: bump version to 0.10.2.3

Modified: pkg/Rcpp/R/RcppLdpath.R
===================================================================
--- pkg/Rcpp/R/RcppLdpath.R	2013-01-15 02:36:44 UTC (rev 4211)
+++ pkg/Rcpp/R/RcppLdpath.R	2013-01-15 13:36:30 UTC (rev 4212)
@@ -51,7 +51,6 @@
         flags <- paste(rcppdir, "/libRcpp.a", sep="")
         if (.Platform$OS.type=="windows") {
             flags <- asBuildPath(flags)
-            flags <- shQuote(flags)
         }
     } else {					# else for dynamic linking
         flags <- paste("-L", rcppdir, " -lRcpp", sep="") # baseline setting
@@ -72,7 +71,6 @@
     path <- Rcpp.system.file( "include" )
     if (.Platform$OS.type=="windows") {
         path <- asBuildPath(path)
-        path <- shQuote(path)
     }
     paste("-I", path, if( cxx0x && canUseCXX0X() ) " -std=c++0x" else "", sep="")
 }



More information about the Rcpp-commits mailing list