remove increment guarantee, it causes problems if called faster than a million times...
authorbeware <beware@bircd.org>
Sun, 5 Aug 2012 01:01:50 +0000 (01:01 +0000)
committerbeware <beware@bircd.org>
Sun, 5 Aug 2012 01:01:50 +0000 (01:01 +0000)
git-svn-id: file:///svnroot/lcore/trunk@116 b1de8a11-f9be-4011-bde0-cc7ace90066a

btime.pas

index c1301442b91233dc52e7e28355988bcf7645f778..ee7583bc9ecbd40ec98c3e9876335ad9d5ebb09b 100644 (file)
--- a/btime.pas
+++ b/btime.pas
@@ -410,7 +410,7 @@ begin
 \r
   result := f;\r
 \r
 \r
   result := f;\r
 \r
-  if (result < mmtime_lastresult) then result := mmtime_lastresult + 0.000001;\r
+  if (result < mmtime_lastresult) then result := mmtime_lastresult;\r
   mmtime_lastresult := result;\r
 end;\r
 \r
   mmtime_lastresult := result;\r
 end;\r
 \r