[Rcpp-commits] r3922 - in pkg/Rcpp: . R inst/include

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

Author: romain
Date: 2012-11-09 08:32:55 +0100 (Fri, 09 Nov 2012)
New Revision: 3922

Modified:
   pkg/Rcpp/ChangeLog
   pkg/Rcpp/R/Attributes.R
   pkg/Rcpp/inst/include/RcppCommon.h
Log:
include <limits> instead of <limits.h>

Modified: pkg/Rcpp/ChangeLog
===================================================================
--- pkg/Rcpp/ChangeLog	2012-11-08 16:20:45 UTC (rev 3921)
+++ pkg/Rcpp/ChangeLog	2012-11-09 07:32:55 UTC (rev 3922)
@@ -1,4 +1,8 @@
+2012-11-09  Romain Francois <romain at r-enthusiasts.com>
 
+        * R/Attributes.R: Passing verbose from evalCpp to cppFunction
+        * include/RcppCommon.h: include <limits> instead of <limits.h>
+
 2012-11-08  JJ Allaire <jj at rstudio.org>
 
         * R/Attributes.R: special sourceCpp handling for file within the src

Modified: pkg/Rcpp/R/Attributes.R
===================================================================
--- pkg/Rcpp/R/Attributes.R	2012-11-08 16:20:45 UTC (rev 3921)
+++ pkg/Rcpp/R/Attributes.R	2012-11-09 07:32:55 UTC (rev 3922)
@@ -211,7 +211,7 @@
     code <- sprintf( "SEXP get_value(){ return wrap( %s ) ; }", code )
     env <- new.env()
     cppFunction(code, depends = depends, includes = includes, env = env, 
-                rebuild = rebuild, showOutput = showOutput)
+                rebuild = rebuild, showOutput = showOutput, verbose = verbose )
     fun <- env[["get_value"]]
     fun()
 }

Modified: pkg/Rcpp/inst/include/RcppCommon.h
===================================================================
--- pkg/Rcpp/inst/include/RcppCommon.h	2012-11-08 16:20:45 UTC (rev 3921)
+++ pkg/Rcpp/inst/include/RcppCommon.h	2012-11-09 07:32:55 UTC (rev 3922)
@@ -133,7 +133,7 @@
 #include <numeric>
 #include <algorithm>
 #include <complex>
-#include <limits.h>
+#include <limits>
 #include <typeinfo>
 #include <Rcpp/sprintf.h>