lisp - 如何使用 clisp 将字符串转换为列表？

Question

如何优雅地将字符串 "1 2 3 4 5 6 7" 转换为列表 (1 2 3 4 5 6 7)？我正在使用 CLISP。

Answer 1

这是一个递归的解决方案。

    ;Turns a string into a stream so it can be read into a list
    (defun string-to-list (str)
        (if (not (streamp str))
           (string-to-list (make-string-input-stream str))
           (if (listen str)
               (cons (read str) (string-to-list str))
               nil)))