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

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

Author: romain
Date: 2010-03-15 22:26:21 +0100 (Mon, 15 Mar 2010)
New Revision: 909

Modified:
   pkg/Rcpp/inst/unitTests/runit.S4.R
Log:
fix S4 test

Modified: pkg/Rcpp/inst/unitTests/runit.S4.R
===================================================================
--- pkg/Rcpp/inst/unitTests/runit.S4.R	2010-03-15 20:19:32 UTC (rev 908)
+++ pkg/Rcpp/inst/unitTests/runit.S4.R	2010-03-15 21:26:21 UTC (rev 909)
@@ -85,8 +85,8 @@
 		', Rcpp = TRUE, includes = "using namespace Rcpp ;" )
 	tr <- fx( "track" )
 	checkTrue( inherits( tr, "track" ) )
-	checkEquals( tr at x, 0.0 )
-	checkEquals( tr at y, 0.0 )
+	checkEquals( tr at x, numeric(0) )
+	checkEquals( tr at y, numeric(0) )
 	checkException( fx( "someclassthatdoesnotexist" ) )
 	
 }