--- a/hedgewars/uLandOutline.pas	Fri Nov 28 14:58:33 2014 -0500
+++ b/hedgewars/uLandOutline.pas	Sat Nov 29 01:19:29 2014 +0100
@@ -253,7 +253,7 @@
 var i: Longword;
 begin
     CheckSelfIntersect:= false;
-    if (ind <= 0) or (ind >= Pred(pa.Count)) then
+    if (ind <= 0) or (LongInt(ind) >= Pred(pa.Count)) then
         exit;
 
     CheckSelfIntersect:= true;