define-macro
リビジョン342でコアからdefine-macroの実装を外しました。新しいdefine-macroは次のように定義しています。
(define-syntax define-macro (lambda (x) (syntax-case x () ((_ (name . args) . body) #'(define-macro name (lambda args . body))) ((_ name body) #'(define-syntax name (let ((define-macro-transformer body)) (lambda (x) (syntax-case x () ((e0 . e1) (datum->syntax #'e0 (apply define-macro-transformer (syntax->datum #'e1))))))))))))
もしも互換性に問題が発生することがあれば教えてください m(_ _)m