remove extraneous path->string conversion

original commit: bb71539233
2011-09-04 23:53:13 -05:00 · 2011-09-04 23:53:13 -05:00 · 1161087456
commit 1161087456
parent d622961559
1 changed files with 1 additions and 1 deletions
--- a/collects/compiler/commands/make.rkt
+++ b/collects/compiler/commands/make.rkt
@ -66,7 +66,7 @@
                      (lambda (p)
                        (set! did-one? #t)
                        (when (verbose)
-                          (printf "  making ~s\n" (path->string p))))])
+                          (printf "  making ~s\n" p)))])
        (for ([file source-files])
          (unless (file-exists? file)
            (error mzc-symbol "file does not exist: ~a" file))