suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

pretty-print bug for hash tables fixed

Browse Source 
svn: r290

original commit: 6f16af82f2bea3e8be1fd8c692976225f53cbe89
This commit is contained in:
Matthew Flatt 2005-07-01 15:35:52 +00:00
parent 3db0c23a92
commit 5789ce5e26
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/mzlib/pretty.ss
View File

@ -668,9 +668,9 @@
#f #f
(lambda ()
(out "#hash")
(wr-lst (hash-table-map obj cons) #f depth))
(parameterize ([print-hash-table #f])
((if display? orig-display orig-write) obj pport))))]
(wr-lst (hash-table-map obj cons) #f depth)))
(parameterize ([print-hash-table #f])
((if display? orig-display orig-write) obj pport)))]
[(boolean? obj)
(out (if obj "#t" "#f"))]
[(number? obj)