[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