[Robast-commits] r505 - branches/robast-0.9/pkg/RobExtremes/tests
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Thu Sep 6 11:44:41 CEST 2012
Author: horbenko
Date: 2012-09-06 11:44:41 +0200 (Thu, 06 Sep 2012)
New Revision: 505
Modified:
branches/robast-0.9/pkg/RobExtremes/tests/TestSuite.R
Log:
Modified: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite.R 2012-09-06 08:09:12 UTC (rev 504)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite.R 2012-09-06 09:44:41 UTC (rev 505)
@@ -1,3 +1,15 @@
+##########################################
+## ##
+## TestSuite for RobExtremes Package ##
+## ##
+##########################################
+
+##load RobExtremes package
+require(RobExtremes)
+
+##load RUnit package
+require(RUnit)
+
#Options: if the exceptions are shown as errors
## Not run:
## quiet log output
@@ -8,8 +20,8 @@
## End(Not run)
## run test suite
-myTestSuite <- defineTestSuite("RUnit Example",dirs="./tests",
-testFileRegexp = "^test.+\\R$",testFuncRegexp = "^test.+")
+myTestSuite <- defineTestSuite("RUnit Tests for RobExtremes",dirs="./TestSuite",
+testFileRegexp = "^Test.+\\R$",testFuncRegexp = "^test.+")
testResult <- runTestSuite(myTestSuite)
## is test suite valid?
More information about the Robast-commits
mailing list