From d375f5d50a8cb9449932294ee76266cfb0dd36b6 Mon Sep 17 00:00:00 2001 From: Jim Pryor Date: Mon, 20 Dec 2010 22:29:04 -0500 Subject: [PATCH] cps tweak Signed-off-by: Jim Pryor --- hints/cps_hint_4.mdwn | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hints/cps_hint_4.mdwn b/hints/cps_hint_4.mdwn index 72296706..9804ed62 100644 --- a/hints/cps_hint_4.mdwn +++ b/hints/cps_hint_4.mdwn @@ -15,7 +15,7 @@ This function is developed in *The Seasoned Schemer* pp. 165-177. It accepts a l [(atom? (car l)) (begin (let/cc k2 (set! resume k2) ; now calling resume with val will ignore val - ; and continue with the second line of (begin ... (walk (cdr l))) + ; and continue with the final line of (begin ... (walk (cdr l))) ; when the next line is executed, yield will be bound to k1 or k3 (yield (car l))) ; the previous yield line will never return, but the following line will be executed when resume is called -- 2.11.0