** continuation 是一个封装于表达式的计算上下文中的一部分。 call-with-composable-continuation 函数捕捉从函数调用外部开始到最近的闭包提示内的 current continuation **。(注意,每个REPL交互是包裹在一个提示中的)
例如,在
(+ 1 (+ 1 (+ 1 0)))
在0被计算的点,表达式上下文包含三个嵌套的加法表达式。我们可以通过改变上下文中的0去抓取返回0之前的** continuation **:
> (define saved-k #f)
> (define (save-it!)
(call-with-composable-continuation
(lambda (k) ; k是被捕捉的continuation
(set! save-k k)
0)))
> (+ 1 (+ 1 (+ 1 (save-it!))))
3
** continuation 被保存在程序上下文 (+ 1 (+ 1 (+ 1 ?)))中的save-k封装中,?位置意味着 save-it! 被调用的上下文中会插入一个值。 continuation **是一个封装,它的表现与函数(lambda (v) (+ 1 (+ 1 (+ 1 v)))类似:
> (saved-k 0)
3
> (saved-k 10)
13
> (saved-k (saved-k 0))
6
** continuation **是通过call-with-composable-continuation动态判断捕捉的,而不是依照语法。例如:
> (define (sum n)
(if (zero? n)
(save-it!)
(+ n (sum (sub1 n)))))
> (sum 5)
15
在saved-k中的** continuation **变为了(lambda (x) (+ 5 (+ 4 (+ 3 (+ 2 (+ 1 x)))))):
> (saved-k 0)
15
> (saved-k 10)
25
在Racket(或Scheme)中一个更传统的操作符是call-with-current-continuation,它通常被简写为call/cc。它与call-with-composable-continuation类似,除了在恢复保存的** continuation 之前捕捉的地一个中断(对于当前提示符)。另外,Scheme系统传统上提供一个单独提示符在程序开始点,而不是通过call-with-continuation-prompt给予一个新提示符。 Continuations 在Racket中有时也称为 delimited continuations ,从一个程序可以采用一个新分割提示符, continuation 便通过在 Racket 中有时被称为 composable continuations 是call-with-composable-continuation捕捉,因为他们没有一个内置的 中断(abort) **。
如何有效的使用** continuations **,可以看More: System Programming with Racket。对于具体的控制操作符,有比起这里初级描述更加方便的命名,请查看racket/control。