commit 0aaf1e3a12bbdb54d3ccdcbdc56aa5ccc82619b9
parent 259cd8ae6406c0c3e1085f3dded5ab20340b0494
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date: Sun, 15 Nov 2009 13:05:34 +0000
unstable/gui/notify: added partial docs
svn: r16782
original commit: 92aa2fc780ce30c607090678d4ea1868761d82bc
Diffstat:
1 file changed, 5 insertions(+), 0 deletions(-)
diff --git a/collects/macro-debugger/view/frame.ss b/collects/macro-debugger/view/frame.ss
@@ -25,6 +25,11 @@
unstable/gui/notify)
(provide macro-stepper-frame-mixin)
+(define-syntax override/return-false
+ (syntax-rules ()
+ [(override/return-false m ...)
+ (begin (define/override (m) #f) ...)]))
+
(define (macro-stepper-frame-mixin base-frame%)
(class* base-frame% (stepper-frame<%>)
(init-field config)