[Rcpp-commits] r1163 - pkg/Rcpp/inst/unitTests

[noreply at r-forge.r-project.org]

Author: edd
Date: 2010-05-04 14:10:40 +0200 (Tue, 04 May 2010)
New Revision: 1163

Modified:
   pkg/Rcpp/inst/unitTests/runit.Argument.R
Log:
update to newer usage of List::create


Modified: pkg/Rcpp/inst/unitTests/runit.Argument.R
===================================================================
--- pkg/Rcpp/inst/unitTests/runit.Argument.R	2010-05-04 11:56:11 UTC (rev 1162)
+++ pkg/Rcpp/inst/unitTests/runit.Argument.R	2010-05-04 12:10:40 UTC (rev 1163)
@@ -19,10 +19,10 @@
 
 test.Argument <- function(){
     fx <- cppfunction( signature(), '
-	Argument x("x") ;
-	Argument y("y") ;
+	Argument x("x");
+	Argument y("y");
 
-	return make_list( x = 2, y = 3 );
+	return List::create( x = 2, y = 3 );
     ' )
     checkEquals( fx(), list( x = 2L, y = 3L ) , msg = "Argument")
 }