Как использовать процедуру прерывания в Chicken Scheme

Question

Я пытаюсь использовать Chicken Scheme'sabort процедуру, как показано в коде ниже:

(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). Удачи с вашим модулем!