[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