[Rcpp-commits] r2209 - pkg/Rcpp/inst/include/Rcpp/vector
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Mon Sep 27 15:11:10 CEST 2010
Author: romain
Date: 2010-09-27 15:11:10 +0200 (Mon, 27 Sep 2010)
New Revision: 2209
Modified:
pkg/Rcpp/inst/include/Rcpp/vector/Vector.h
Log:
cleaning
Modified: pkg/Rcpp/inst/include/Rcpp/vector/Vector.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/vector/Vector.h 2010-09-27 13:10:33 UTC (rev 2208)
+++ pkg/Rcpp/inst/include/Rcpp/vector/Vector.h 2010-09-27 13:11:10 UTC (rev 2209)
@@ -22,8 +22,6 @@
#ifndef Rcpp__vector__Vector_h
#define Rcpp__vector__Vector_h
-// template <int RTYPE, typename VEC, typename T> class Assigner ;
-
template <int RTYPE>
class Vector :
public RObject,
@@ -791,69 +789,4 @@
} ; /* Vector */
-// template <int RTYPE, typename VEC, typename T>
-// class Assigner{
-// public:
-//
-// Assigner( VEC& target_, const T& source_ ) : target(target_), source(source_){
-// Rprintf( "Assigner wrap ( %s )\n", DEMANGLE(Assigner) ) ;
-// }
-//
-// inline void assign(){
-// target.set_sexp( r_cast<RTYPE>( wrap(source) ) );
-// }
-//
-// private:
-// VEC& target ;
-// const T& source ;
-// } ;
-//
-// template <int RTYPE, typename VEC, bool SOURCE_NA, typename SOURCE_T>
-// class Assigner<RTYPE,VEC, VectorBase<RTYPE,SOURCE_NA,SOURCE_T> >{
-// public:
-//
-// typedef VectorBase<RTYPE,SOURCE_NA,SOURCE_T> T ;
-//
-// Assigner( VEC& target_, const T& source_ ) : target(target_), source(source_){
-// Rprintf( "Assigner sugar ( %s )\n", DEMANGLE(Assigner) ) ;
-// }
-//
-// inline void assign(){
-// int n = target.size() ;
-// if( n == source.size() ){
-//
-// const SOURCE_T& ref = source.get_ref() ;
-// // just copy the data
-// typename VEC::iterator start = target.begin() ;
-//
-// int __trip_count = n >> 2 ;
-// int i = 0 ;
-// for ( ; __trip_count > 0 ; --__trip_count) {
-// start[i] = ref[i] ; i++ ;
-// start[i] = ref[i] ; i++ ;
-// start[i] = ref[i] ; i++ ;
-// start[i] = ref[i] ; i++ ;
-// }
-// switch (n - i){
-// case 3:
-// start[i] = ref[i] ; i++ ;
-// case 2:
-// start[i] = ref[i] ; i++ ;
-// case 1:
-// start[i] = ref[i] ; i++ ;
-// case 0:
-// default:
-// {}
-// }
-// } else{
-// target.set_sexp( r_cast<RTYPE>( wrap(source) ) );
-// }
-// }
-//
-// private:
-// VEC& target ;
-// const T& source ;
-//
-// } ;
-
#endif
More information about the Rcpp-commits
mailing list