hedgewars/uFloat.pas
changeset 5192 881c14f81d12
parent 5151 cbadb9fa52fc
child 5319 51d8e4747876
--- a/hedgewars/uFloat.pas	Fri Apr 29 17:05:10 2011 +0400
+++ b/hedgewars/uFloat.pas	Fri Apr 29 17:11:08 2011 +0400
@@ -192,7 +192,7 @@
 function hwFloat2Float (const i: hwFloat) : extended;
 begin
 hwFloat2Float:= i.QWordValue / $100000000;
-if i.isNegative then hwFloat2Float:=hwFloat2Float*-1;
+if i.isNegative then hwFloat2Float:= -hwFloat2Float;
 end;
 
 operator + (const z1, z2: hwFloat) z : hwFloat;