# HG changeset patch # User unc0rr # Date 1200869825 0 # Node ID 43b3444888042181322983c57c4cb14adee65ec9 # Parent 7a966319476713a3b628f67e8dce4941dfb5fb32 Perform small optimization of sqrt diff -r 7a9663194767 -r 43b344488804 hedgewars/uFloat.pas --- a/hedgewars/uFloat.pas Sun Jan 20 22:53:46 2008 +0000 +++ b/hedgewars/uFloat.pas Sun Jan 20 22:57:05 2008 +0000 @@ -294,7 +294,7 @@ end else begin l:= $100000000; - r:= t.QWordValue + r:= t.QWordValue div 2 + $80000000 // r:= t / 2 + 0.5 end; repeat