Disable use of macro-debugger/emit

This commit is contained in:
Sam Tobin-Hochstadt 2010-06-16 20:04:28 -04:00
parent ca3b27b810
commit 8a0bab9fe3

View File

@ -4,7 +4,7 @@
syntax/boundmap syntax/boundmap
syntax/stx syntax/stx
scheme/struct-info scheme/struct-info
macro-debugger/emit ;macro-debugger/emit
"patterns.rkt" "patterns.rkt"
"compiler.rkt") "compiler.rkt")
@ -148,7 +148,7 @@
[mresult (transformer mstx)] [mresult (transformer mstx)]
[result (syntax-local-introduce (introducer mresult))] [result (syntax-local-introduce (introducer mresult))]
[cert* (lambda (id) (certifier (cert id) #f introducer))]) [cert* (lambda (id) (certifier (cert id) #f introducer))])
(emit-local-step stx result #:id expander) ;(emit-local-step stx result #:id expander)
(parse/cert result cert*)))) (parse/cert result cert*))))
;; raise an error, blaming stx ;; raise an error, blaming stx