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

temporary fix for mztake in the presence of tabs

Browse Source 
svn: r200
This commit is contained in:
Guillaume Marceau 2005-06-16 23:22:52 +00:00
parent d11899eca6
commit 357ee29e7f
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
collects/mztake/debug-tool.ss
View File

@ -510,8 +510,8 @@
get-definitions-text get-definitions-text
get-interactions-text get-interactions-text
get-menu-bar get-menu-bar
break-callback ;; break-callback TODO
reset-offer-kill ;; reset-offer-kill
get-top-level-window) get-top-level-window)
(define breakpoints (make-hash-table)) (define breakpoints (make-hash-table))
@ -684,8 +684,9 @@
(bell) (bell)
(begin (begin
(set! want-suspend-on-break? #t) (set! want-suspend-on-break? #t)
(break-callback) ;; (break-callback)
(reset-offer-kill))))] ;; (reset-offer-kill)
)))]
[enabled #t])) [enabled #t]))
(define resume-button (define resume-button