|
From: Leslie P. P. <sk...@vi...> - 2010-04-25 09:15:01
|
Teemu Likonen wrote:
> (with-open-stream (s (run-program-stream "ls" "-la"))
> (loop for line = (read-line s nil)
> while line
> do (format t "~A~%" line)))
>
>
> Running the script with "./program | head" prints the first lines of the
> output but also gives me the following error:
>
>
> --8<---------------cut here---------------start------------->8---
> unhandled SB-INT:SIMPLE-STREAM-ERROR in thread #<SB-THREAD:THREAD
> "initial thread" RUNNING
> {A9F0A19}>:
> Couldn't write to #<SB-SYS:FD-STREAM for "standard output" {A9F10F9}>:
> Broken pipe
You need to install a custom SIGPIPE handler.
Leslie
|