hedgewars/uFloat.pas
changeset 7638 4560cd5b6ad0
parent 7624 03d662ff9c41
child 7657 347e18494fb9
equal deleted inserted replaced
7637:60b213e5ded3 7638:4560cd5b6ad0
   387         b:= ((z1.Round > z2.Round) or ((z1.Round = z2.Round) and (z1.Frac > z2.Frac))) <> z1.isNegative
   387         b:= ((z1.Round > z2.Round) or ((z1.Round = z2.Round) and (z1.Frac > z2.Frac))) <> z1.isNegative
   388 end;
   388 end;
   389 
   389 
   390 function isZero(const z: hwFloat): boolean; inline; 
   390 function isZero(const z: hwFloat): boolean; inline; 
   391 begin
   391 begin
   392 isZero := z.Round = 0 and z.Frac = 0;
   392 isZero := (z.Round = 0) and (z.Frac = 0);
   393 end;
   393 end;
   394 {$ENDIF}
   394 {$ENDIF}
   395 
   395 
   396 operator - (const z1: hwFloat) z : hwFloat; inline;
   396 operator - (const z1: hwFloat) z : hwFloat; inline;
   397 begin
   397 begin