paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 07:39:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix formatting of the writing of the fraction

Browse Source 
git-svn-id: trunk@35235 -
This commit is contained in:
florian 2017-01-04 22:57:43 +00:00
parent 466d26b5ef
commit 3706ab4e44
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/bench/timer.pas
View File

@ -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;