Sorry if this is a question answered before.
How can I capture the output of a shell command?
I found the follow code from google but it seems not working. The output
still goes to stdout.
(define (system/output command-string)
(let ([p (open-output-string)])
(parameterize ([current-output-port p])
(if (system command-string)
(get-output-string p)
#f))))
Thank you!
Jinsong
_______________________________________________
Chicken-users mailing list
Chicken-users@nongnu.org
https://lists.nongnu.org/mailman/listinfo/chicken-users
