bisekt: round(), damit Vergleiche stabil werden

1 files changed, 2 insertions, 2 deletions

diff --git a/fhunit.pas b/fhunit.pas
index d75ce95..a1b2cbf 100644
--- a/fhunit.pas
+++ b/fhunit.pas
@@ -292,12 +292,12 @@ begin
   ma:=count;
   while mi<ma do begin
     neu:=(mi+ma) div 2;
-    if (neu>=count) or (items[neu].zeit<zeit) then begin
+    if (neu>=count) or (round((items[neu].zeit - zeit) * 6 * 24) < 0) then begin
       inc(neu);
       mi:=neu;
       continue;
     end;
-    if items[neu].zeit>zeit then begin
+    if round((items[neu].zeit - zeit) * 6 * 24) > 0 then begin
       ma:=neu;
       continue;
     end;