# HG changeset patch
# User unc0rr
# Date 1248784353 0
# Node ID ef19b949ad3046171067ba560e7464d647058f35
# Parent  28519f4f3f21560b85187d760528c7c4682cd7b3
Fix hwSign to give 1 on -0 value

diff -r 28519f4f3f21 -r ef19b949ad30 hedgewars/uMisc.pas
--- a/hedgewars/uMisc.pas	Sun Jul 26 20:56:18 2009 +0000
+++ b/hedgewars/uMisc.pas	Tue Jul 28 12:32:33 2009 +0000
@@ -170,7 +170,7 @@
 
 function hwSign(r: hwFloat): LongInt;
 begin
-if r.isNegative then hwSign:= -1 else hwSign:= 1
+if r.isNegative and (r.QWordValue > 0) then hwSign:= -1 else hwSign:= 1
 end;
 
 function Min(a, b: LongInt): LongInt;