From: Jim Pryor Date: Tue, 21 Dec 2010 16:02:36 +0000 (-0500) Subject: cps: delta tweak X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=commitdiff_plain;h=6d7421674411dbbd0cd48910aecc197f316e6879;hp=45bb412ca548c5cd02967d2b6c4d7ce2b0a88f0b cps: delta tweak Signed-off-by: Jim Pryor --- diff --git a/hints/cps_hint_4.mdwn b/hints/cps_hint_4.mdwn index 13add0a2..09a45af3 100644 --- a/hints/cps_hint_4.mdwn +++ b/hints/cps_hint_4.mdwn @@ -40,7 +40,7 @@ This function is developed in *The Seasoned Schemer* pp. 165-177. It accepts a l (let ([fst (let/cc k1 (begin (set! yield k1) ; now calling yield with val will bind fst to val and continue with the (cond ...) block below (walk lst) - ; the next line will be executed only when lst contains no atoms + ; the next line will be executed when we've walked to the end of lst (yield '())))]) (cond [(atom? fst) (check fst)]