[Rcpp-commits] r1294 - pkg/Rcpp/tests

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Thu May 20 15:45:38 CEST 2010


Author: romain
Date: 2010-05-20 15:45:38 +0200 (Thu, 20 May 2010)
New Revision: 1294

Modified:
   pkg/Rcpp/tests/doRUnit.R
Log:
revert (we can just use R CMD check --no-tests)

Modified: pkg/Rcpp/tests/doRUnit.R
===================================================================
--- pkg/Rcpp/tests/doRUnit.R	2010-05-20 13:04:30 UTC (rev 1293)
+++ pkg/Rcpp/tests/doRUnit.R	2010-05-20 13:45:38 UTC (rev 1294)
@@ -15,21 +15,17 @@
 if(require("RUnit", quietly = TRUE)) {
   pkg <- "Rcpp"
                                        
-  if( ! nzchar(Sys.getenv("RCPP_DISABLE_UNIT_TESTS")) ){  
-    require( pkg, character.only=TRUE)
-    
-    path <- system.file("unitTests", package = pkg)
-    
-    stopifnot(file.exists(path), file.info(path.expand(path))$isdir)
-    
-    # without this, we get unit test failures
-    Sys.setenv( R_TESTS = "" )
-    
-    source(file.path(path, "runTests.R"), echo = TRUE)
-  } else{
-  	print( "unit tests are disabled" )  
-  }
-
+  require( pkg, character.only=TRUE)
+  
+  path <- system.file("unitTests", package = pkg)
+  
+  stopifnot(file.exists(path), file.info(path.expand(path))$isdir)
+  
+  # without this, we get unit test failures
+  Sys.setenv( R_TESTS = "" )
+  
+  source(file.path(path, "runTests.R"), echo = TRUE)
+  
 } else {
 	print( "package RUnit not available, cannot run unit tests" )
 }                                                                                                 



More information about the Rcpp-commits mailing list