Forgot to use the patched version of extend-reader in the previous commit

This commit is contained in:
Georges Dupéron 2017-01-01 22:22:02 +01:00
parent 72142d5374
commit 1c7d513cf4

View File

@ -64,7 +64,7 @@
(require syntax/strip-context) (require syntax/strip-context)
(define ((wrap-reader-unhygienic p) . p-args) (define ((wrap-reader-unhygienic p) . p-args)
(strip-context (strip-context
(apply (extend-reader p (apply (extend-reader-unhygienic p
(λ ([orig-rt (current-readtable)] (λ ([orig-rt (current-readtable)]
#:outer-scope outer-scope #:outer-scope outer-scope
#:arg-str [arg-str (current-arg-string)]) #:arg-str [arg-str (current-arg-string)])