Added the macro stepper
svn: r3987 original commit: d91e2b45022c0c043578a5f08b152825db417c07
This commit is contained in:
parent
e65fb6226b
commit
2bca123204
11
collects/macro-debugger/view/util.ss
Normal file
11
collects/macro-debugger/view/util.ss
Normal file
|
@ -0,0 +1,11 @@
|
|||
|
||||
(module util mzscheme
|
||||
(require (lib "class.ss"))
|
||||
(provide override/return-false)
|
||||
|
||||
(define-syntax override/return-false
|
||||
(syntax-rules ()
|
||||
[(override/return-false m ...)
|
||||
(begin (define/override (m) #f) ...)]))
|
||||
|
||||
)
|
Loading…
Reference in New Issue
Block a user