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

Fixed hiding + renaming

Browse Source 
Changed colors
Made bound-id=? default

svn: r4367

original commit: 8e9d6e6d0786348b28d7469a688ee4f6327862de
This commit is contained in:
Ryan Culpepper 2006-09-18 16:21:16 +00:00
parent f812f155bb
commit 73a1330578
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/macro-debugger/syntax-browser/pretty-helper.ss
View File

@ -84,6 +84,8 @@
(pairloop (cdr obj)))] (pairloop (cdr obj)))]
[(null? obj) [(null? obj)
null] null]
[(and (syntax? obj) (null? (syntax-e obj)))
null]
[else (loop obj)])) [else (loop obj)]))
(values (loop stx) (values (loop stx)
flat=>stx flat=>stx