types - LISP:该值不是预期的类型 LIST

Question

我对使用 LISP 进行编码非常陌生，我正在尝试编写这个初步代码片段以将文件中的单词读入参数，然后打印出该列表中的所有单词以确保所有这些话被放进去了。这是我目前所拥有的:

(defparameter *wordlist* nil)

(defun run()
  (get-words-from-file)
  (print-wordlist *wordlist*))

(defun get-words-from-file ()
  (let ((in (open "/Users/levibanks/Desktop/cs352/program3/wordlist.txt")))
    (dotimes (n 500)
      (setq *wordlist* (append (read-line in))))
  (close in)))

(defun print-wordlist (wordlist)
  (when wordlist
    (print (car wordlist))
    (print-wordlist (cdr wordlist))))

但是，当我尝试运行这段代码时，它给了我错误“值‘brown’[我正在读出的文件中的一个词]不是预期的 LIST 类型。”

我真的不确定为什么这不起作用，因为这是我以前看到的列表打印方式，所以非常感谢任何帮助!

Answer 1

你应该继续阅读

• append
• push
• with-open-file

特别是，(setq a (append b)) 不会将任何内容附加到 a 的先前值。

你需要的是

(defun read-lines-from-file (file-name)
  (with-open-file (input file-name)
    (loop for line = (read-line input nil nil)
       while line collect line)))

(defparameter *wordlist* (read-lines-from-file "/Users/levibanks/Desktop/cs352/program3/wordlist.txt"((