0

我是第一次学习 Scheme，为了练习，我正在尝试编写一个程序，它返回一个指定长度的列表，所有值都等于 1。我在 Windows 10 上使用 MIT/GNU Edwin 编辑器。这是我输入的代码：

(define (listlength n)
  (if (= n 1)
      (list 1)
      (append (list 1) (listlength (- n 1)))))

(listlength 5)

我希望C-x C-e返回(1 1 1 1 1)，但我得到一个未绑定的变量错误：

;Unbound variable: listlength
;To continue, call RESTART with an option number:
;  (RESTART 3) => Specify a value to use instead of listlength.
;  (RESTART 2) => Define listlength to a given value.
;  (RESTART 1) => Return to read-eval-print level 1.
;Start debugger? (y or n):

我能想到的唯一原因是它不喜欢我在listlength的定义中调用listlength，但这应该是Scheme Scheme的一部分，所以？？？我不知所措？？感谢你给与我的帮助！

4

1 回答 1

0

您应该检查是否在函数末尾使用了 Cx Ce。Cx Ce 将计算光标左侧的表达式。或者您可以使用 Mz ，无论光标在哪里，它都会评估整个表达式。我也是Scheme的初学者，希望回答对你有帮助！

于 2017-04-28T15:06:40.460 回答