# HG changeset patch
# User nemo
# Date 1270082906 0
# Node ID 5d8f4737b6cdbac006d6aebfb2242c027f9a85ab
# Parent  f5f4c611bcac2e340b38712f85bf8b802a5dda2d
another uninitialised value radz[k] for corresponding pa.ar of NTPX

diff -r f5f4c611bcac -r 5d8f4737b6cd hedgewars/uLand.pas
--- a/hedgewars/uLand.pas	Thu Apr 01 00:38:02 2010 +0000
+++ b/hedgewars/uLand.pas	Thu Apr 01 00:48:26 2010 +0000
@@ -508,8 +508,9 @@
 var radz: array[0..Pred(cMaxEdgePoints)] of LongInt;
     i, k, dist, px, py: LongInt;
 begin
-radz[0]:= 0;
 for i:= 0 to Pred(pa.Count) do
+  begin
+  radz[i]:= 0;
   with pa.ar[i] do
     if x <> NTPX then
       begin
@@ -523,6 +524,7 @@
           radz[i]:= Max(0, Min(dist - radz[k] - cMinDist, radz[i]))
         end
       end;
+  end;
 
 for i:= 0 to Pred(pa.Count) do
   with pa.ar[i] do