scheme - 如何在 Chicken Scheme 中使用 abort 程序

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). 祝你的模块好运！