remove extraneous path->string conversion

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))

collects/compiler/main.rkt

@@ -510,7 +510,7 @@
    (parameterize ([compile-notify-handler 
                    (lambda (path)
                      (when (compiler:option:somewhat-verbose)
-                       (printf "  making ~s\n" (path->string path))))])
+                       (printf "  making ~s\n" path)))])
      (apply compile-collection-zos source-files))]
   [(cc)
    (for ([file source-files])