[Rcpp-commits] r929 - pkg/Rcpp/R

[noreply at r-forge.r-project.org]

Author: romain
Date: 2010-03-20 19:06:14 +0100 (Sat, 20 Mar 2010)
New Revision: 929

Modified:
   pkg/Rcpp/R/RcppLdpath.R
Log:
added an internal staticLinking function that identifies if the current platform should default to static linking

Modified: pkg/Rcpp/R/RcppLdpath.R
===================================================================
--- pkg/Rcpp/R/RcppLdpath.R	2010-03-20 17:57:16 UTC (rev 928)
+++ pkg/Rcpp/R/RcppLdpath.R	2010-03-20 18:06:14 UTC (rev 929)
@@ -69,3 +69,8 @@
 
 Cxx0xFlags <- function() cat( RcppCxx0xFlags() )
 
+# default is to use static linking on windows an OSX
+staticLinking <- function(){
+	.Platform$OS.type == "windows" || grepl( "^darwin", R.version$os )
+}
+