remove increment guarantee, it causes problems if called faster than a million times...

[lcore.git] / btime.pas

diff --git a/btime.pas b/btime.pas
index c1301442b91233dc52e7e28355988bcf7645f778..ee7583bc9ecbd40ec98c3e9876335ad9d5ebb09b 100644 (file)
--- a/btime.pas
+++ b/btime.pas
@@ -410,7 +410,7 @@ begin
 \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