# NOT RUN {
if (require(svUnit)) {
clearLog()
runTest(svSuite("package:svUnit"), "svUnit")
# }
# NOT RUN {
# Tests to run with example() but not with R CMD check
runTest(svSuite("package:svUnit (VirtualClass)"), "VirtualClass")
# }
# NOT RUN {
# }
# NOT RUN {
# Tests to present in ?unitTests.svUnit but not run automatically
# Run all currently loaded packages test cases and test suites
runTest(svSuiteList(), "AllTests")
# }
# NOT RUN {
# }
# NOT RUN {
# Check errors at the end (needed to interrupt R CMD check)
errorLog()
}
# }
Run the code above in your browser using DataLab