avoid leading colon for id

svn: r936 original commit: 457d23c390607b70ee8e3fd98205a68e6ac91e9a
2005-09-29 15:49:27 +00:00 · 2005-09-29 15:49:27 +00:00 · f46bf065a2
commit f46bf065a2
parent bad05e233d
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)