;;; SPDX-License-Identifier: LGPL-3.0-or-later ;;; SPDX-FileCopyrightText: Copyright © 2010-2021 Tony Garnock-Jones #lang racket/base (require auxiliary-macro-context) (define-auxiliary-macro-context #:context-name event-expander #:prop-name prop:event-expander #:prop-predicate-name event-expander? #:prop-accessor-name event-expander-proc #:macro-definer-name define-event-expander #:introducer-parameter-name current-event-expander-introducer #:local-introduce-name syntax-local-event-expander-introduce #:expander-id-predicate-name event-expander-id? #:expander-transform-name event-expander-transform) (provide (for-syntax prop:event-expander event-expander? event-expander-proc syntax-local-event-expander-introduce event-expander-id? event-expander-transform) define-event-expander)