[Rcpp-commits] r4581 - in pkg/Rcpp/inst/include/Rcpp: api/meat traits

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

Author: edd
Date: 2013-10-23 02:56:44 +0200 (Wed, 23 Oct 2013)
New Revision: 4581

Modified:
   pkg/Rcpp/inst/include/Rcpp/api/meat/is.h
   pkg/Rcpp/inst/include/Rcpp/traits/is_finite.h
Log:
suppress two "unused paramter 'x'" warnings


Modified: pkg/Rcpp/inst/include/Rcpp/api/meat/is.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/api/meat/is.h	2013-10-22 18:38:37 UTC (rev 4580)
+++ pkg/Rcpp/inst/include/Rcpp/api/meat/is.h	2013-10-23 00:56:44 UTC (rev 4581)
@@ -51,7 +51,7 @@
     template <> inline bool is__simple<CharacterMatrix>(SEXP x) {
         return TYPEOF(x) == STRSXP && is_matrix(x);
     }
-    template <> inline bool is__simple<RObject>( SEXP x ){
+    template <> inline bool is__simple<RObject>(SEXP) {
         return true ;
     }
     template <> inline bool is__simple<IntegerVector>( SEXP x ){

Modified: pkg/Rcpp/inst/include/Rcpp/traits/is_finite.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/traits/is_finite.h	2013-10-22 18:38:37 UTC (rev 4580)
+++ pkg/Rcpp/inst/include/Rcpp/traits/is_finite.h	2013-10-23 00:56:44 UTC (rev 4581)
@@ -46,8 +46,8 @@
         }
         
         template <>
-        inline bool is_finite<STRSXP>(SEXP x) { 
-            return false; // see rcpp-devel on 2013-10-02; was:  x != NA_STRING; 
+        inline bool is_finite<STRSXP>(SEXP) { 
+            return false; 	// see rcpp-devel on 2013-10-02; was:  x != NA_STRING; 
         }
         
         template <>