Mercurial > repos > ethevenot > checkformat
diff runit/checkformat_tests.R @ 1:e194eec8e70c draft
planemo upload for repository https://github.com/workflow4metabolomics/checkformat.git commit 8ebfbfa8d9449c9bbfbf569851a30b1e33df0b3f
author | ethevenot |
---|---|
date | Sat, 06 Aug 2016 11:54:28 -0400 |
parents | |
children | 80a38d36f946 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/runit/checkformat_tests.R Sat Aug 06 11:54:28 2016 -0400 @@ -0,0 +1,11 @@ +test_input_default <- function() { + + testDirC <- "input" + argLs <- list() + + argLs <- c(defaultArgF(testDirC), argLs) + outLs <- wrapperCallF(argLs) + + checkEquals(outLs[['infVc']][4], 'Table formats are OK; enjoy your analyses!') + +}