--- a/hedgewars/uTypes.pas	Wed Nov 17 20:36:35 2010 +0300
+++ b/hedgewars/uTypes.pas	Wed Nov 17 20:58:23 2010 +0300
@@ -233,7 +233,7 @@
         doStep: TVGearStepProcedure;
         Tex: PTexture;
         alpha, scale: GLfloat;
-        Hedgehog: pointer;
+        Hedgehog: PHedgehog;
         Text: shortstring;
         Tint: Longword;
         end;