R/runPipeline.R

runPipeline <-
function(x) {
    if (!checkPipeline(x)) {
        stop("Invalid pipeline")
    }
    modules <- getNodeSet(xmlRoot(x), "module")
    invisible(lapply(modules, runModule))
}
bradleydrayton/pipeline documentation built on May 13, 2019, 2:27 a.m.