如何在lisp中同时获取两个输入？

Question

我想添加两个用户在Lisp中输入的数字。我怎样才能做到这一点？我使用read命令两次，但显示错误。

Answer 1

我建议使用parse-number库从用户输入中解析数字。使用read可以让用户直接访问您不想要的Lisp阅读器。

这样的事情应该有效：

(defun prompt-number (prompt &optional (prompt-stream *standard-output*)
                                       (read-stream *standard-input*))
  (format prompt-stream "~a: " prompt)
  (parse-number:parse-number (read-line read-stream)))