如何在Chicken Scheme中使用中止程序

Question

我正在尝试使用Chicken Scheme的 中止程序,如下面的代码所示:

(module change-calculator (export calculate-change)
  (import scheme)

  (define (calculate-change coin-values amount)
    (cond ((null? coin-values) (abort '"coin-values should contain at least one value."))
          ((= 0 amount) '() )))
)

但得到以下警告:

Warning: reference to possibly unbound identifier `abort' in:
Warning:    calculate-change

该文档未提及任何需要导入的附加模块.我尝试导入extras,utils,srfi-12没有任何成功.谁能告诉我使用中止程序的正确方法？还是我错过了别的什么？

Answer 1

啊,这是一个容易犯的错误.这条线(import scheme)应该是(import scheme chicken).祝你的模块好运!