X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftime.lisp;h=c028cb26151931da2932b960d5f9a1b3fd080cc2;hb=771b864c8f32af7734bc0550aeaf1539fc4df194;hp=e4e023b23ca181a59e0b021fcd9f8b7085533fe4;hpb=dfa8294a1580e8aa099a92baebba7d9caddb2fcb;p=sbcl.git

diff --git a/src/code/time.lisp b/src/code/time.lisp
index e4e023b..c028cb2 100644
--- a/src/code/time.lisp
+++ b/src/code/time.lisp
@@ -357,12 +357,12 @@
       (let ((gc-run-time (max (- *gc-run-time* start-gc-run-time) 0)))
 	(format *trace-output*
 		"~&Evaluation took:~%  ~
-		 ~S second~:P of real time~%  ~
-		 ~S second~:P of user run time~%  ~
-		 ~S second~:P of system run time~%  ~
+                 ~S second~:P of real time~%  ~
+                 ~S second~:P of user run time~%  ~
+                 ~S second~:P of system run time~%  ~
 ~@[                 [Run times include ~S second~:P GC run time.]~%  ~]~
-		 ~S page fault~:P and~%  ~
-		 ~:D bytes consed.~%"
+                 ~S page fault~:P and~%  ~
+                 ~:D bytes consed.~%"
 		(max (/ (- new-real-time old-real-time)
 			(float sb!xc:internal-time-units-per-second))
 		     0.0)