From 44848d349cae5ff7131af366a177ef7d9a131a54 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Thu, 21 May 2009 02:35:00 +0000 Subject: [PATCH] comment typo svn: r14894 --- collects/mzlib/control.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/mzlib/control.ss b/collects/mzlib/control.ss index 409d2a1435..59576fd5b2 100644 --- a/collects/mzlib/control.ss +++ b/collects/mzlib/control.ss @@ -73,7 +73,7 @@ ;; call-with-control, parameterized over whether to keep the ;; prompt (if the prompt's handler gives us the option of ;; removing it). The generated function is the same - ;; a fcontrol when `abort-cc' is `abort-current-continuation'. + ;; as fcontrol when `abort-cc' is `abort-current-continuation'. (define (make-call-with-control abort-cc) ;; Uses call/cc to always keep the enclosing prompt. (letrec ([call-with-control