From 3706ab4e44a39346d7455a6597427e281368dcbe Mon Sep 17 00:00:00 2001 From: florian Date: Wed, 4 Jan 2017 22:57:43 +0000 Subject: [PATCH] * fix formatting of the writing of the fraction git-svn-id: trunk@35235 - --- tests/bench/timer.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/bench/timer.pas b/tests/bench/timer.pas index ada0fbbaa5..56cee4a791 100644 --- a/tests/bench/timer.pas +++ b/tests/bench/timer.pas @@ -68,7 +68,7 @@ unit timer; {$ifdef USEEPIK} write(stderr,e:0:6,' Seconds'); {$else USEEPIK} - write(stderr,s div 1000,'.',format('%03d',[s mod 1000]),' Seconds'); + write(stderr,s div 1000,'.',format('%.3d',[s mod 1000]),' Seconds'); {$endif USEEPIK} end;