;; Move command line to a single list up front, options as alist after
;; Sensible defaults: Creates stdin/stdout/stderr pipes, stores them in process object
;; Should error on non-zero exit unless keep-errors option is set
(let ( (proc (make-process '("ls" "-1")  '() )) )
	(let loop ()
		(let ( (s (read-line (process-stdout proc))) )
			(when (not (eof-object? s))
				(display s) (newline)
				(loop) ) ) ) )