From b78afadc51c4c5666114fab26db31e0199c1f50c Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 22 Jun 2021 08:35:37 +0530
Subject: doc: Specify command inputs in a separate argument.

* doc/capture-output-file-with-parameter-reference.scm,
doc/capture-output-file.scm, doc/capture-stdout.scm, doc/checksum.scm,
doc/decompress-compile-run.scm, doc/hello-world.scm: Specify command
inputs in a separate argument.
* doc/ccwl.skb (Tutorial)[First example]: Update description of
command definition accordingly.
---
 doc/decompress-compile-run.scm | 19 +++++++++++--------
 1 file changed, 11 insertions(+), 8 deletions(-)

(limited to 'doc/decompress-compile-run.scm')

diff --git a/doc/decompress-compile-run.scm b/doc/decompress-compile-run.scm
index 437fb41..a2c58bb 100644
--- a/doc/decompress-compile-run.scm
+++ b/doc/decompress-compile-run.scm
@@ -1,16 +1,19 @@
 (define decompress
-  (command #:run "gzip" "--stdout" "--decompress" (input 'compressed #:type 'File)
-           #:outputs (output 'decompressed #:type 'stdout)))
+  (command #:inputs (compressed #:type 'File)
+           #:run "gzip" "--stdout" "--decompress" compressed
+           #:outputs (decompressed #:type 'stdout)))
 
 (define compile
-  (command #:run "gcc" "-x" "c" (input 'source #:type 'File)
-           #:outputs (output 'executable
-                             #:type 'File
-                             #:binding '((glob . "a.out")))))
+  (command #:inputs (source #:type 'File)
+           #:run "gcc" "-x" "c" source
+           #:outputs (executable
+                      #:type 'File
+                      #:binding '((glob . "a.out")))))
 
 (define run
-  (command #:run (input 'executable)
-           #:outputs (output 'stdout #:type 'stdout)))
+  (command #:inputs executable
+           #:run executable
+           #:outputs (stdout #:type 'stdout)))
 
 (workflow ((compressed-source #:type File))
   (pipe (decompress #:compressed compressed-source)
-- 
cgit v1.2.3