为何提示变量addFraction未绑定？Common Lisp代码报错咨询

咱先拆解你遇到的问题：这个错误说明Lisp解释器没把ADDFRACTION识别成函数，反而把它当成了一个没赋值的变量。主要有两个核心原因，咱们一个个说清楚：

1. 函数定义有语法缺失，导致没成功注册到环境里 #

看你贴的代码：

(defun addFraction (N1 D1 N2 D2) (format t "~d ~d" (+ (+ (lcm D1 D2) N1) (+ (lcm D1 D2) N2)) (lcm D1 D2))

最后少了一个闭合的括号！defun的整个表达式必须用完整的括号包裹，否则解释器会认为你还没写完定义，函数根本没被成功创建。

另外顺便提一句：你原来的分数加法逻辑也有问题，正确的同分母加法应该是把分子转换成对应分母的数值再相加，我帮你把这部分也修正了，完整的正确定义应该是：

(defun addFraction (N1 D1 N2 D2) 
  (format t "~d ~d" 
          (+ (* (/ (lcm D1 D2) D1) N1) (* (/ (lcm D1 D2) D2) N2)) 
          (lcm D1 D2)))

2. 调用方式错误，直接引用了函数名而非调用函数 #

在Common Lisp里，直接输入ADDFRACTION是在引用这个名字的变量，而不是调用函数。调用函数必须用括号把函数名和参数包起来，比如：

(addFraction 1 2 3 4)

如果只是在REPL里单独敲ADDFRACTION，系统会默认找这个名字的变量，自然会触发“未绑定变量”的错误。

解决步骤 #

• 先修正函数定义的括号问题，确保表达式完整，重新在REPL里加载定义
• 用带括号和参数的正确方式调用函数，比如(addFraction 1 2 3 4)，这时候会输出5 4（对应1/2 + 3/4 = 5/4）

内容的提问来源于stack exchange，提问作者popsymark