X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/6e5673aa1dcdb1ba7688b75f7f065353abc86159..555c3c210bd8d681d3b485023926e55b8866eb79:/btime.pas?ds=sidebyside

diff --git a/btime.pas b/btime.pas
index 33b32d0..62b957d 100644
--- a/btime.pas
+++ b/btime.pas
@@ -53,7 +53,7 @@ function unixtimefloat_systemtime:float;
 
 function oletounixfloat(t:float):float;
 function oletounix(t:tdatetime):integer;
-function unixtoole(i:integer):tdatetime;
+function unixtoole(i:float):tdatetime;
 
 {$ifdef win32}
 function mmtimefloat:float;
@@ -130,7 +130,7 @@ begin
   result := trunc(oletounixfloat(t));
 end;
 
-function unixtoole(i:integer):tdatetime;
+function unixtoole(i:float):tdatetime;
 begin
   result := ((i)/86400)+daysdifference;
 end;