[Rcpp-commits] r940 - pkg/Rcpp/src/Rcpp

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Tue Mar 23 16:23:59 CET 2010


Author: romain
Date: 2010-03-23 16:23:59 +0100 (Tue, 23 Mar 2010)
New Revision: 940

Modified:
   pkg/Rcpp/src/Rcpp/Vector.h
Log:
silence -pedantic

Modified: pkg/Rcpp/src/Rcpp/Vector.h
===================================================================
--- pkg/Rcpp/src/Rcpp/Vector.h	2010-03-23 13:29:52 UTC (rev 939)
+++ pkg/Rcpp/src/Rcpp/Vector.h	2010-03-23 15:23:59 UTC (rev 940)
@@ -431,14 +431,14 @@
 class VectorBase : public RObject{
 public:
 	VectorBase() : RObject(){
-		RCPP_DEBUG( "VectorBase()" ) ;
+		RCPP_DEBUG( "VectorBase()", 0 ) ;
 	}
 	VectorBase(SEXP x) : RObject(x){
 		update() ;
 		RCPP_DEBUG( "VectorBase( SEXP = <%p> ) = <%p>", x, asSexp() ) ;
 	}
 	~VectorBase(){
-		RCPP_DEBUG( "~VectorBase" ) ;
+		RCPP_DEBUG( "~VectorBase", 0 ) ;
 	}
 	VectorBase(const VectorBase& v) : RObject( v.asSexp() ){
 		update() ;
@@ -474,12 +474,12 @@
 	struct r_type : traits::integral_constant<int,RTYPE>{} ;
 	
 	Vector() : Base() {
-		RCPP_DEBUG( "Vector()" ) ;
+		RCPP_DEBUG( "Vector()", 0 ) ;
 		Base::setSEXP( Rf_allocVector( RTYPE, 0 ) ) ;
 		init() ;
 	} ;
     ~Vector(){
-    	RCPP_DEBUG( "~Vector()" ) ;
+    	RCPP_DEBUG( "~Vector()", 0 ) ;
 	};
     
 	Vector( const Vector& other) : Base() {
@@ -493,7 +493,7 @@
     Vector( SEXP x ) : Base() {
     	RCPP_DEBUG( "Vector<%d>( SEXP = <%p> )", RTYPE, x) ;
     	Base::setSEXP( r_cast<RTYPE>( x ) ) ;
-    	RCPP_DEBUG( "===========") ;
+    	RCPP_DEBUG( "===========", 0) ;
     }
     
     Vector( const size_t& size ) : Base()  {



More information about the Rcpp-commits mailing list