www

commit 139cc91b33fe111025d28e3a77b90b3f23046691
parent d09828a0195896bf808446c6bda71c5800d43b41
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date:   Thu,  3 Feb 2011 14:32:34 -0700

fix macro stepper bug (missing hash)
  Merge to release branch

original commit: 1054c504ead66fc348487ec726c92bb83a51bd67

Diffstat:
M
collects/macro-debugger/syntax-browser/widget.rkt
 | 
4
++--
M
collects/macro-debugger/view/step-display.rkt
 | 
4
++--

2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/collects/macro-debugger/syntax-browser/widget.rkt b/collects/macro-debugger/syntax-browser/widget.rkt
@@ -117,8 +117,8 @@
             (send -text change-style clickback-style a b)))))
 
     (define/public (add-syntax stx
-                               #:binders [binders #f]
-                               #:shift-table [shift-table #f]
+                               #:binders [binders '#hash()]
+                               #:shift-table [shift-table '#hash()]
                                #:definites [definites #f]
                                #:hi-colors [hi-colors null]
                                #:hi-stxss [hi-stxss null]
diff --git a/collects/macro-debugger/view/step-display.rkt b/collects/macro-debugger/view/step-display.rkt
@@ -84,9 +84,9 @@
              (show-poststep step shift-table)]))
 
     (define/public (add-syntax stx
-                               #:binders [binders #f]
+                               #:binders [binders '#hash()]
                                #:definites [definites #f]
-                               #:shift-table [shift-table #f])
+                               #:shift-table [shift-table '#hash()])
       (send/i sbview sb:syntax-browser<%> add-syntax stx
               #:binders binders
               #:definites definites