Fix printing to match the desired format.

This commit is contained in:
Sam Tobin-Hochstadt 2014-05-19 16:52:13 -04:00
parent 5f2d205602
commit 32ab2c49e0

View File

@ -412,7 +412,7 @@
(cond [hsbencher (cond [hsbencher
(define-values (vs t r gc) (define-values (vs t r gc)
(time-apply run null)) (time-apply run null))
(printf "self time: ~a\n" (/ t 1000.))] (printf "SELFTIMED: ~a\n" (/ t 1000.))]
[else (time (run))])) [else (time (run))]))
(module+ main (module+ main