www

commit 593c71ecd484c7d1eae1329e8b161fdb843ecd32
parent b6e46fabb6196062c0bd18b12d8b3857390f8bba
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date:   Wed, 10 Oct 2007 23:29:56 +0000

fixed syntax browser bug (mailing list 10/10/2007)

svn: r7481

original commit: 324ccee027a6be09a3ad56ed922699eeaa7fbf01

Diffstat:
M
collects/macro-debugger/syntax-browser/pretty-printer.ss
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/collects/macro-debugger/syntax-browser/pretty-printer.ss b/collects/macro-debugger/syntax-browser/pretty-printer.ss
@@ -23,7 +23,7 @@
     (define identifier-list
       (filter identifier? (hash-table-map ht:stx=>flat (lambda (k v) k))))
     (define (flat=>stx obj)
-      (hash-table-get ht:flat=>stx obj))
+      (hash-table-get ht:flat=>stx obj #f))
     (define (stx=>flat stx)
       (hash-table-get ht:stx=>flat stx))
     (define (current-position)