suppress two "unused paramter 'x'" warnings

eddelbuettel · eddelbuettel · commit 60fc45640635 · 2013-10-23T00:56:44.000Z
diff --git a/inst/include/Rcpp/api/meat/is.h b/inst/include/Rcpp/api/meat/is.h
@@ -51,7 +51,7 @@ namespace internal{
     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 ){
diff --git a/inst/include/Rcpp/traits/is_finite.h b/inst/include/Rcpp/traits/is_finite.h
@@ -46,8 +46,8 @@ namespace Rcpp{
         }
         
         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 <>

Original file line number	Diff line number	Diff line change
`@@ -51,7 +51,7 @@ namespace internal{`
`51`	`51`	`template <> inline bool is__simple<CharacterMatrix>(SEXP x) {`
`52`	`52`	`return TYPEOF(x) == STRSXP && is_matrix(x);`
`53`	`53`	`}`
`54`		`- template <> inline bool is__simple<RObject>( SEXP x ){`
	`54`	`+ template <> inline bool is__simple<RObject>(SEXP) {`
`55`	`55`	`return true ;`
`56`	`56`	`}`
`57`	`57`	`template <> inline bool is__simple<IntegerVector>( SEXP x ){`
Original file line number	Diff line number	Diff line change
`@@ -46,8 +46,8 @@ namespace Rcpp{`
`46`	`46`	`}`
`47`	`47`
`48`	`48`	`template <>`
`49`		`- inline bool is_finite<STRSXP>(SEXP x) {`
`50`		`- return false; // see rcpp-devel on 2013-10-02; was: x != NA_STRING;`
	`49`	`+ inline bool is_finite<STRSXP>(SEXP) {`
	`50`	`+ return false; // see rcpp-devel on 2013-10-02; was: x != NA_STRING;`
`51`	`51`	`}`
`52`	`52`
`53`	`53`	`template <>`