e2e-tests/tools/pass-stdin.scm


1
2
3
4
5
6
7
8

(define count-bytes
  (command #:inputs (file #:type File)
           #:run "wc" "-c"
           #:outputs (bytes #:type stdout)
           #:stdin file))

(workflow ((file #:type File))
  (count-bytes #:file file))