Revision: 210
http://acmcontester.svn.sourceforge.net/acmcontester/?rev=210&view=rev
Author: Oracle_
Date: 2008-06-04 02:08:29 -0700 (Wed, 04 Jun 2008)
Log Message:
-----------
Fixed small bug with TL.
Modified Paths:
--------------
ACMServer/branches/Version_2/Server/MainUnit.pas
Modified: ACMServer/branches/Version_2/Server/MainUnit.pas
===================================================================
--- ACMServer/branches/Version_2/Server/MainUnit.pas 2008-06-03 21:41:11 UTC (rev 209)
+++ ACMServer/branches/Version_2/Server/MainUnit.pas 2008-06-04 09:08:29 UTC (rev 210)
@@ -621,7 +621,7 @@
LLog.Add('End Testing RUN');
- WorkedTime:=WorkedTime*100;
+ WorkedTime:=Round((WorkedTime-TLx)/TLk)*100;
UsedMemory:=UsedMemory div 1024;
if Language = L_Pascal then
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
