avoid leading colon for id

svn: r936
2005-09-29 15:49:27 +00:00 · 2005-09-29 15:49:27 +00:00 · 457d23c390
commit 457d23c390
parent 2ff737514b
1 changed files with 1 additions and 1 deletions
--- a/collects/mzlib/pretty.ss
+++ b/collects/mzlib/pretty.ss
@ -447,7 +447,7 @@
 			  (hash-table-remove! table obj)
 			  cycle)))))))

-     (define ::dummy::
+     (define __dummy__
       (when found-cycle
 	 (let loop ([obj obj])
 	   (if (or (vector? obj)