diff options
| -rw-r--r-- | ccwl/ccwl.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm index e920e81..97613a2 100644 --- a/ccwl/ccwl.scm +++ b/ccwl/ccwl.scm @@ -202,7 +202,12 @@ re-matched." interface-inputs outputs))) -(define (pipeline id steps outputs) +(define* (pipeline id steps + #:optional + (outputs + (list (output (string-append id "_stdout") + #:source (string-append (step-id (last steps)) + "/stdout"))))) ;; Error out if any step does not encapsulate a command. (cond ((find (lambda (step) |