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

fix macro stepper bug (missing hash)

Browse Source 
Merge to release branch

original commit: 1054c504ead66fc348487ec726c92bb83a51bd67
This commit is contained in:
Ryan Culpepper 2011-02-03 14:32:34 -07:00
parent d09828a019
commit 139cc91b33
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/macro-debugger/syntax-browser/widget.rkt
View File

@ -117,8 +117,8 @@
(send -text change-style clickback-style a b))))) (send -text change-style clickback-style a b)))))
(define/public (add-syntax stx (define/public (add-syntax stx
#:binders [binders #f] #:binders [binders '#hash()]
#:shift-table [shift-table #f] #:shift-table [shift-table '#hash()]
#:definites [definites #f] #:definites [definites #f]
#:hi-colors [hi-colors null] #:hi-colors [hi-colors null]
#:hi-stxss [hi-stxss null] #:hi-stxss [hi-stxss null]

4
collects/macro-debugger/view/step-display.rkt
View File

@ -84,9 +84,9 @@
(show-poststep step shift-table)])) (show-poststep step shift-table)]))
(define/public (add-syntax stx (define/public (add-syntax stx
#:binders [binders #f] #:binders [binders '#hash()]
#:definites [definites #f] #:definites [definites #f]
#:shift-table [shift-table #f]) #:shift-table [shift-table '#hash()])
(send/i sbview sb:syntax-browser<%> add-syntax stx (send/i sbview sb:syntax-browser<%> add-syntax stx
#:binders binders #:binders binders
#:definites definites #:definites definites