From abc18a40c38b7b041359bb31550c520817660125 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Thu, 16 Jul 2009 12:25:13 +0000 Subject: [PATCH] comment svn: r15458 --- collects/scribble/text/output.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/scribble/text/output.ss b/collects/scribble/text/output.ss index 347b20e350..adddb6b536 100644 --- a/collects/scribble/text/output.ss +++ b/collects/scribble/text/output.ss @@ -137,7 +137,7 @@ (set-mcar! pfxs npfx) (set-mcdr! pfxs 0) (for-each loop c) (set-mcar! pfxs pfx) (set-mcdr! pfxs lpfx))] - [(add-prefix) + [(add-prefix) ; add to the current prefix (unless it's #f) (let* ([pfx (mcar pfxs)] [lpfx (mcdr pfxs)] [npfx (pfx+ (pfx+col (pfx+ pfx lpfx)) (car c))]) (set-mcar! pfxs npfx) (set-mcdr! pfxs 0)