From: beware Date: Sun, 5 Aug 2012 01:01:50 +0000 (+0000) Subject: remove increment guarantee, it causes problems if called faster than a million times... X-Git-Url: http://www.lcore.org/git/lcore.git/commitdiff_plain/36ee947888d0a2a0d0f47d3f89f035a5dc96931f remove increment guarantee, it causes problems if called faster than a million times per second git-svn-id: file:///svnroot/lcore/trunk@116 b1de8a11-f9be-4011-bde0-cc7ace90066a --- diff --git a/btime.pas b/btime.pas index c130144..ee7583b 100644 --- a/btime.pas +++ b/btime.pas @@ -410,7 +410,7 @@ begin result := f; - if (result < mmtime_lastresult) then result := mmtime_lastresult + 0.000001; + if (result < mmtime_lastresult) then result := mmtime_lastresult; mmtime_lastresult := result; end;