... | ... |
@@ -1,7 +1,7 @@ |
1 | 1 |
Package: pipeComp |
2 | 2 |
Type: Package |
3 | 3 |
Title: pipeComp pipeline benchmarking framework |
4 |
-Version: 0.99.49 |
|
4 |
+Version: 0.99.51 |
|
5 | 5 |
Depends: R (>= 4.0) |
6 | 6 |
Authors@R: c( |
7 | 7 |
person("Pierre-Luc", "Germain", email="[email protected]", role=c("cre","aut"), comment = c(ORCID = "0000-0003-3418-4218")), |
... | ... |
@@ -280,7 +280,7 @@ Some errors were encountered during the run:") |
280 | 280 |
wStep <- which(vapply(args,FUN=function(x){ chParam %in% x },logical(1))) |
281 | 281 |
# fetch the object from the previous step) |
282 | 282 |
while( (w <- which(names(objects)==names(args)[wStep])) && |
283 |
- !is.na(objects[[w-1]]) && is.null(objects[[w-1]]) && wStep > 2 ) |
|
283 |
+ (all(is.na(objects[[w-1]])) || is.null(objects[[w-1]])) && wStep > 2) |
|
284 | 284 |
wStep <- wStep-1 # to handle steps without parameter |
285 | 285 |
x <- objects[[w-1]] |
286 | 286 |
if(is.null(x)){ |