summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--ccwl/ccwl.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index a2f6d49..2385f91 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -97,8 +97,9 @@
   (field-appender step-out set-step-out))
 
 (define-immutable-record-type <command>
-  (make-command outputs args stdin other)
+  (make-command additional-inputs outputs args stdin other)
   command?
+  (additional-inputs command-additional-inputs)
   (outputs command-outputs set-command-outputs)
   (args command-args)
   (stdin command-stdin set-command-stdin)
@@ -109,7 +110,7 @@
 
 (define* (command id arguments #:key (additional-inputs '()) (outputs '()) (other '()))
   (make-step id
-             (make-command outputs arguments #f other)
+             (make-command additional-inputs outputs arguments #f other)
              ;; A command can use the same input multiple times. So,
              ;; deduplicate.
              (delete-duplicates