Mercurial > repos > ethevenot > profia
comparison runit/profia_runtests.R @ 2:3f8ae071bdda draft
planemo upload for repository https://github.com/workflow4metabolomics/profia.git commit 19ed25c048232776369a392ddb8c1860471acd29
author | ethevenot |
---|---|
date | Mon, 22 Jan 2018 11:32:41 -0500 |
parents | 39ccace77270 |
children |
comparison
equal
deleted
inserted
replaced
1:4753e64cf694 | 2:3f8ae071bdda |
---|---|
47 argLs <- c(argLs, parC, paramLs[[parC]]) | 47 argLs <- c(argLs, parC, paramLs[[parC]]) |
48 | 48 |
49 ## Call | 49 ## Call |
50 wrapperCallC <- paste(c(wrapperPathC, argLs), collapse = " ") | 50 wrapperCallC <- paste(c(wrapperPathC, argLs), collapse = " ") |
51 | 51 |
52 print(wrapperCallC) | |
53 | |
54 if(.Platform$OS.type == "windows") | 52 if(.Platform$OS.type == "windows") |
55 wrapperCallC <- paste("Rscript", wrapperCallC) | 53 wrapperCallC <- paste("Rscript", wrapperCallC) |
56 | 54 |
57 wrapperCodeN <- system(wrapperCallC) | 55 wrapperCodeN <- system(wrapperCallC) |
58 | 56 |
59 if (wrapperCodeN != 0) | 57 if (wrapperCodeN != 0) |
60 stop("Error when running profia_wrapper.R.") | 58 stop("Error when running profia_wrapper.R.") |
61 | 59 |