Vector(double)

Qiang Kou · Qiang Kou · commit 3de7c3437d00 · 2015-05-30T20:55:55.000-04:00
diff --git a/inst/include/Rcpp/vector/Vector.h b/inst/include/Rcpp/vector/Vector.h
@@ -125,7 +125,12 @@ class Vector :
     }
 
     Vector( const size_t& size ) {
-        Storage::set__( Rf_allocVector( RTYPE, size) ) ;
+        Storage::set__( Rf_allocVector( RTYPE, static_cast<R_xlen_t>(size)) ) ;
+        init() ;
+    }
+
+    Vector( const double& size ) {
+        Storage::set__( Rf_allocVector( RTYPE, static_cast<R_xlen_t>(size)) ) ;
         init() ;
     }
 

Original file line number	Diff line number	Diff line change
`@@ -125,7 +125,12 @@ class Vector :`
`125`	`125`	`}`
`126`	`126`
`127`	`127`	`Vector( const size_t& size ) {`
`128`		`- Storage::set__( Rf_allocVector( RTYPE, size) ) ;`
	`128`	`+ Storage::set__( Rf_allocVector( RTYPE, static_cast<R_xlen_t>(size)) ) ;`
	`129`	`+ init() ;`
	`130`	`+ }`
	`131`	`+`
	`132`	`+ Vector( const double& size ) {`
	`133`	`+ Storage::set__( Rf_allocVector( RTYPE, static_cast<R_xlen_t>(size)) ) ;`
`129`	`134`	`init() ;`
`130`	`135`	`}`
`131`	`136`