checkEquals/checkTrue

romainfrancois · romainfrancois · commit bb2d02e77b18 · 2016-04-01T13:03:00.000+02:00
diff --git a/inst/unitTests/runit.Module.R b/inst/unitTests/runit.Module.R
@@ -106,9 +106,9 @@ if( .runThisTest && Rcpp:::capabilities()[["Rcpp modules"]] ) {
 
     test.Module.destructor <- function(){
         f <- new( ModuleCopyConstructor, 4L)
-        checkEquals( !is_destructed(f) )
+        checkTrue( !is_destructed(f) )
         destruct(f)
-        checkEquals( is_destructed(f) )
+        checkTrue( is_destructed(f) )
     }
 
 }

Original file line number	Diff line number	Diff line change
`@@ -106,9 +106,9 @@ if( .runThisTest && Rcpp:::capabilities()[["Rcpp modules"]] ) {`
`106`	`106`
`107`	`107`	`test.Module.destructor <- function(){`
`108`	`108`	`f <- new( ModuleCopyConstructor, 4L)`
`109`		`- checkEquals( !is_destructed(f) )`
	`109`	`+ checkTrue( !is_destructed(f) )`
`110`	`110`	`destruct(f)`
`111`		`- checkEquals( is_destructed(f) )`
	`111`	`+ checkTrue( is_destructed(f) )`
`112`	`112`	`}`
`113`	`113`
`114`	`114`	`}`