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

fix misuse of trace-printf

Browse Source
This commit is contained in:
Matthew Butterick 2016-12-19 10:29:14 -08:00 committed by Matthew Flatt
parent 3b6eda5f7d
commit 3e4a0353cf
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/collects/compiler/cm.rkt
View File

@ -573,7 +573,7 @@
(when ok-to-compile? (when ok-to-compile?
(log-compile-event path 'start-compile) (log-compile-event path 'start-compile)
(when zo-exists? (try-delete-file zo-name #f)) (when zo-exists? (try-delete-file zo-name #f))
(trace-printf (format "compiling ~a" actual-path)) (trace-printf "compiling ~a" actual-path)
(parameterize ([depth (+ (depth) 1)]) (parameterize ([depth (+ (depth) 1)])
(with-handlers (with-handlers
([exn:get-module-code? ([exn:get-module-code?