求助：如何定义将列表元素转为float的Common Lisp函数

原代码存在几个明显问题：

• 拼写错误：cond第一个分支里的liste是笔误，应与函数参数保持一致为list。
• 逻辑错误：仅针对符号'id做转换，但符号无法直接转为Float，且没有构建转换后的新列表，最终要么返回nil要么触发错误。
• 需求不匹配：没有实现遍历列表并将所有元素转为Float的核心功能。

基础递归实现（假设所有元素均为可转换的数字） #

(defun intofloat (list)
  (cond
    ((null list) nil)
    (t (cons (float (first list))
             (intofloat (rest list))))))

这个版本会遍历输入列表，将每个元素转换为Float类型，通过cons逐步构建转换后的新列表，直到列表为空时返回nil。

容错版实现（处理非数字元素） #

如果需要避免非数字元素转换报错，可以增加类型判断：

(defun intofloat (list)
  (cond
    ((null list) nil)
    ((numberp (first list))
     (cons (float (first list))
           (intofloat (rest list))))
    (t (cons nil ; 也可以替换为你需要的默认值，比如0.0
             (intofloat (rest list))))))

该版本会先检查元素是否为数字，是则转换为Float，否则返回nil（或自定义默认值），保证函数不会因非数字元素崩溃。

内容的提问来源于stack exchange，提问作者CL-Beginner Zoni