io - 新 lisp 用户的 "read"命令的简单 IO 说明

Question

我是 lisp 的新用户。我一直在尝试通过谷歌搜索和查找示例来弄清楚如何使用 lisp read 命令大约一个小时。我一直没有成功，终于认输了。

谁能给我一个非常简单的 lisp 函数示例，它可以接受 2 个输入并添加它们？

我最好的尝试:

(defun func ()
(print "Enter first integer")
(read)
(print "Enter second integer")
(read)
(print (+ A B))
)

我曾尝试尝试使用 (read A) 或使用前缀来读取 (format t “~A” string) 但没有成功。我一直在互联网上寻找的所有信息都非常复杂，我无法理解它的正反面。真的应该这么难吗？我可能对 bash/ksh/csh/sh 太熟悉了...

Answer 1

您永远不会将读取输入分配给您的变量:

(defun func ()
  (print "Enter first integer") 
  (finish-output)
  (let ((a (read)))
    (print "Enter second integer")
    (finish-output)
    (let ((b (read)))
      (print (+ a b)))))