diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/doRUnit.R | 17 |
1 files changed, 5 insertions, 12 deletions
diff --git a/tests/doRUnit.R b/tests/doRUnit.R index e2ad4cd2..ed3ef1df 100644 --- a/tests/doRUnit.R +++ b/tests/doRUnit.R @@ -1,17 +1,10 @@ +# $Id: doRUnit.R 96 2011-04-29 11:10:40Z jranke $ +# Adapted from a version around 2.9 of the rcdk package by Rajarshi Guha if(require("RUnit", quietly=TRUE)) { - ## --- Setup --- - - pkg <- "mkin" # <-- Change to package name! - if(Sys.getenv("RCMDCHECK") == "FALSE") { - ## Path to unit tests for standalone running under Makefile (not R CMD check) - ## PKG/tests/../inst/unitTests - path <- file.path(getwd(), "..", "inst", "unitTests") - } else { - ## Path to unit tests for R CMD check - ## PKG.Rcheck/tests/../PKG/unitTests - path <- system.file(package=pkg, "unitTests") - } + pkg <- "mkin" + path <- system.file(package=pkg, "unitTests") + cat("\nRunning unit tests\n") print(list(pkg=pkg, getwd=getwd(), pathToUnitTests=path)) |