tests/run.R

library(RUnit)
library(lisp)

results <- runTestSuite(defineTestSuite('lisp',
                                        'lisp',
                                        testFileRegexp='^.+\\.[rR]'))
printTextProtocol(results)
errors <- getErrors(results)
if (errors$nErr || errors$nFail)
  stop('Unit testing failed (vide supra).')
klutometis/R-lisp documentation built on May 20, 2019, 12:37 p.m.