lisp - 普通口齿不清 : read each input character as a list element

Question

这里是 Lisp 新手。

我想从标准中读取一串字符，例如:

aabc

我想将该输入转换为一个列表，其中每个字符都成为一个列表元素:

(a a b c)

我希望将列表分配给全局变量 text。

我创建了这个函数:

(defun get-line ()
    (setf text (read)))

但这只会导致将单个符号分配给 text，而不是将输入标记为符号列表。

请问get-line() 的正确实现方式是什么？

Answer 1

开始吧:首先使用 coerce 将字符串转换为字符列表，然后使用 mapcar 将每个字符转换为字符串。

(defun get-line ()
    (setf text (mapcar 'string (coerce (string (read)) 'list))))