如何调用在 lisp 中打印列表的函数？

Question

我试图在 lisp 中调用一个函数，将它的参数分配给一个列表并将它们打印到控制台，但没有将任何内容打印到控制台。 代码如下所示

(defun make-cd (title artist rating ripped)
  (list :title title :artist artist :rating rating :ripped ripped))
(make-cd "Roses" "Kathy Mattea" 7 t)

调用make-cd函数应该返回

(:TITLE "Roses" :ARTIST "Kathy Mattea" :RATING 7 :RIPPED T)

我该如何解决这个问题？

Answer 1

您可以通过将值推送到 CD 列表来简单地返回该值，我相信您最初使用的书中的示例会这样做（稍后您将在打印它们时格式化数据库中的每张 CD）：

(defun make-cd (artist title rating ripped)
   (push (list :artist artist :title title :rating rating :ripped ripped)
     *cds*))

因此，如果我调用该函数，它会将 CD 的内容返回到控制台：

(make-cd "Cece Winans" "Mercy Said No" 10 t)
((:ARTIST "Cece Winans" :TITLE "Mercy Said No" :RATING 10 :RIPPED T))

在您推送到 CD 数据库的 CD 的情况下，该值将返回到控制台。

Answer 2

你可以看这里：What's the difference between write, print, pprint, princ, and prin1?

format 也可用于在 REPL 或任何输出流（文件、管道等）中打印列表。

(format t "~a" (list "Peter" 15 "Steven" 59.4d0))
    => (Peter 15 Steven 59.4d0)

您可以查看 CLHS 中的材料：http://www.lispworks.com/documentation/lw50/CLHS/Body/f_format.htm 或者在 Practical Common Lisp 中，我相信你从中得到了你的例子：http://www.gigamonkeys.com/book/a-few-format-recipes.html

Answer 3

(defun make-cd (title artist rating ripped)
  (print (list :title title :artist artist :rating rating :ripped ripped)))

抱歉解决了。