Я пытаюсь написать игрушечный интерпретатор схемы Python на основе метакругового оценщика в SICP. Поскольку python поддерживает только стек вызовов ограниченной глубины, мне нужно исключить хвостовые вызовы. Я читал про батуты и реализовал с ним парсер.
Но я не знаю, как написать функции анализатора / оценщика в стиле продолжения, чтобы использовать их с трамплинами. Например, функция eval-if
:
(define (eval-if expr env)
(if (is-true? (eval (if-predicate expr) env))
(eval (if-consequent expr) env)
(eval (if-alternate expr) env)))
в питоне:
def eval_if(expr, env):
if is_true(eval(if_predicate(expr), env)):
return eval(if_consequent(expr), env)
else:
return eval(if_alternate(expr), env)
когда я хочу проверить, истинен ли предикат, я должен вызвать для него новый раунд eval
. Как мне написать такие рекурсивные вызовы в форме CPS?