[Rcpp-devel] [Rcpp-commits] r320 - in pkg/src: . Rcpp

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Fri Jan 8 19:55:38 CET 2010


Author: romain
Date: 2010-01-08 19:55:38 +0100 (Fri, 08 Jan 2010)
New Revision: 320

Modified:
   pkg/src/CharacterVector.cpp
   pkg/src/ExpressionVector.cpp
   pkg/src/Rcpp/ExpressionVector.h
   pkg/src/Rcpp/GenericVector.h
Log:
make Wall happy

Modified: pkg/src/CharacterVector.cpp
===================================================================
--- pkg/src/CharacterVector.cpp	2010-01-08 18:33:58 UTC (rev 319)
+++ pkg/src/CharacterVector.cpp	2010-01-08 18:55:38 UTC (rev 320)
@@ -105,10 +105,12 @@
 
 CharacterVector::StringProxy& CharacterVector::StringProxy::operator=( const StringProxy& rhs){
 	SET_STRING_ELT( parent, index, STRING_ELT( rhs.parent, rhs.index) ) ;
+	return *this ;
 }
 
 CharacterVector::StringProxy& CharacterVector::StringProxy::operator=( const std::string& rhs){
 	SET_STRING_ELT( parent, index, Rf_mkChar( rhs.c_str() ) ) ;
+	return *this ;
 }
 
 const CharacterVector::StringProxy CharacterVector::operator[](int i) const {

Modified: pkg/src/ExpressionVector.cpp
===================================================================
--- pkg/src/ExpressionVector.cpp	2010-01-08 18:33:58 UTC (rev 319)
+++ pkg/src/ExpressionVector.cpp	2010-01-08 18:55:38 UTC (rev 320)
@@ -54,7 +54,7 @@
 	ExpressionVector::ExpressionVector( std::initializer_list<RObject> list ) {
 		SEXP x = PROTECT( Rf_allocVector( EXPRSXP, list.size() ) ) ;
 		const RObject* p = list.begin() ;
-		for( int i=0; i<list.size() ; i++, p++){
+		for( size_t i=0; i<list.size() ; i++, p++){
 			SET_VECTOR_ELT( x, i, p->asSexp() ) ;
 		}
 		setSEXP( x ) ;
@@ -81,10 +81,12 @@
 
 ExpressionVector::Proxy& ExpressionVector::Proxy::operator=( const Proxy& rhs){
 	SET_VECTOR_ELT( parent, index, VECTOR_ELT( rhs.parent, rhs.index) ) ;
+	return *this ;
 }
 
 ExpressionVector::Proxy& ExpressionVector::Proxy::operator=( SEXP rhs){
 	SET_VECTOR_ELT( parent, index, rhs ) ;
+	return *this ;
 }
 
 const ExpressionVector::Proxy ExpressionVector::operator[](int i) const {

Modified: pkg/src/Rcpp/ExpressionVector.h
===================================================================
--- pkg/src/Rcpp/ExpressionVector.h	2010-01-08 18:33:58 UTC (rev 319)
+++ pkg/src/Rcpp/ExpressionVector.h	2010-01-08 18:55:38 UTC (rev 320)
@@ -47,6 +47,7 @@
 		template <typename T>
 		Proxy& operator=( const T& rhs){
 			SET_VECTOR_ELT( parent, index, wrap(rhs) ) ;
+			return *this; 
 		}
 
 		/* rvalue use */

Modified: pkg/src/Rcpp/GenericVector.h
===================================================================
--- pkg/src/Rcpp/GenericVector.h	2010-01-08 18:33:58 UTC (rev 319)
+++ pkg/src/Rcpp/GenericVector.h	2010-01-08 18:55:38 UTC (rev 320)
@@ -47,6 +47,7 @@
 		template <typename T>
 		Proxy& operator=( const T& rhs){
 			SET_VECTOR_ELT( parent, index, wrap(rhs) ) ;
+			return *this; 
 		}
 		
 		/* rvalue use */

_______________________________________________
Rcpp-commits mailing list
Rcpp-commits at lists.r-forge.r-project.org
https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-commits


More information about the Rcpp-devel mailing list