suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Use the regular Racket reader, not TR's.

Browse Source
This commit is contained in:
Vincent St-Amour 2012-11-26 16:34:31 -05:00
parent ca47b1c693
commit a84e04e1e4
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/typed-racket/optimizer/tool/report.rkt
View File

@ -3,7 +3,6 @@
(require racket/class racket/gui/base racket/match racket/port racket/list (require racket/class racket/gui/base racket/match racket/port racket/list
unstable/syntax racket/sandbox unstable/syntax racket/sandbox
typed-racket/optimizer/logging typed-racket/optimizer/logging
(prefix-in tr: typed-racket/typed-reader)
"logging.rkt" "mzc.rkt") "logging.rkt" "mzc.rkt")
(provide (struct-out report-entry) (provide (struct-out report-entry)
@ -79,7 +78,7 @@
base) base)
(current-load-relative-directory))] (current-load-relative-directory))]
[read-accept-reader #t]) [read-accept-reader #t])
(void (compile (tr:read-syntax portname input)))))))) (void (compile (read-syntax portname input))))))))
(filter right-file? (reverse log))) (filter right-file? (reverse log)))