From c90711b06a55c03daea93fe08af3cbff549b48c4 Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Thu, 15 Jan 2009 14:40:52 +0000 Subject: [PATCH] macro stepper: fixed documentation build (removed dependence on mred-kernel) svn: r13152 original commit: b75dfb878ae38a75bd54ce9d208f1f86d5ba26b1 --- collects/macro-debugger/util/notify.ss | 17 +---------------- 1 file changed, 1 insertion(+), 16 deletions(-) diff --git a/collects/macro-debugger/util/notify.ss b/collects/macro-debugger/util/notify.ss index 8da4293f..991bce12 100644 --- a/collects/macro-debugger/util/notify.ss +++ b/collects/macro-debugger/util/notify.ss @@ -16,9 +16,7 @@ menu-option/notify-box menu-group/notify-box check-box/notify-box - choice/notify-box - - methods:notify) + choice/notify-box) (define-for-syntax (join . args) (define (->string x) @@ -74,19 +72,6 @@ (define/public-final (listen-name listener) (send name listen listener))))])) - -(define-interface-expander methods:notify - (lambda (stx) - (syntax-case stx () - [(_ name ...) - (apply append - (for/list ([name (syntax->list #'(name ...))]) - (list ;; (join "init-" #'name) - (join "get-" name) - (join "set-" name) - (join "listen-" name))))]))) - - (define-syntax (connect-to-pref stx) (syntax-case stx () [(connect-to-pref name pref)