add nil check
authornemo
Sat, 30 Jul 2011 17:23:47 -0400
changeset 5482 c047e70c53f4
parent 5481 d3b9c4263cb7
child 5483 fc755bb8096d
add nil check
hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Sat Jul 30 15:36:11 2011 -0400
+++ b/hedgewars/uGears.pas	Sat Jul 30 17:23:47 2011 -0400
@@ -914,7 +914,7 @@
             CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State and not gstAttacked;
         if delay2 = 0 then
             begin
-            if CurrentHedgehog^.Gear^.State and gstAttacked = 0 then SweepDirty;
+            if (CurrentHedgehog^.Gear <> nil) and (CurrentHedgehog^.Gear^.State and gstAttacked = 0) then SweepDirty;
             CheckNoDamage;
             AliveCount:= 0; // shorter version of check for win to allow typical step activity to proceed
             for i:= 0 to Pred(ClansCount) do