From 69ea58ac923e96f5b13f8ffaff1808a59c26de79 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Wed, 12 Dec 2007 20:09:50 +0000 Subject: [PATCH] added function contract & purpose svn: r7976 --- collects/framework/private/color.ss | 2 ++ 1 file changed, 2 insertions(+) diff --git a/collects/framework/private/color.ss b/collects/framework/private/color.ss index 7a0e9f3e08..6e31b5c4fe 100644 --- a/collects/framework/private/color.ss +++ b/collects/framework/private/color.ss @@ -483,6 +483,8 @@ (end-edit-sequence) (set! in-match-parens? #f)))) + ;; highlight-nested-region : number number number -> void + ;; colors nested regions of parentheses. (define/private (highlight-nested-region orig-start orig-end here) (let paren-loop ([start orig-start] [end orig-end]