CLISP：从 shell 命令返回 stdout、stderr 和 retcode

Question

我正在使用 Common Lisp 编写一些脚本，并希望 run-program 执行 shell 命令。我一直在尝试操纵输出以获取 (output error returncode) 形式的列表，但我只能从 运行-program 获取输出或返回码。

这里的参数只给你:output（没有:error）：

有没有办法同时获得这三个？像这样：

(setf retcode (my-special-cmd "ls" :output stream1 :error stream2))
(print (list stream1 stream2 retcode))

Answer 1

run-program returns multiple values。您可以按照 linked 问题中的说明处理它们。

您 link 的文档说：

If :STREAM was specified for :INPUT or :OUTPUT, a Lisp STREAM is returned. If :STREAM was specified for both :INPUT and :OUTPUT, three Lisp STREAMs are returned, as for the function EXT:MAKE-PIPE-IO-STREAM.

因此你需要的是

(EXT:MAKE-PIPE-IO-STREAM "ls")

或

(ext:run-program "ls" :input :stream :output :stream)

然后您将必须从返回的流中读取以获得命令输出。但是，在这种情况下，您将丢失退出代码。

CLISP：从 shell 命令返回 stdout、stderr 和 retcode

CLISP: Returning stdout, stderr, and retcode from a shell command

lisp

shell

clisp

common-lisp