--- a/hedgewars/uTypes.pas	Thu Feb 16 21:32:19 2012 +0100
+++ b/hedgewars/uTypes.pas	Thu Feb 16 23:20:49 2012 +0100
@@ -442,6 +442,15 @@
         moveAnim: TWidgetMovement;
         end;
 
+    PTouch_Data = ^TTouch_Data;
+    TTouch_Data = record
+        id                       : TSDL_FingerId;
+        x,y                      : LongInt;
+        dx,dy                    : LongInt;
+        historicalX, historicalY : LongInt;
+        timeSinceDown            : Longword;
+        end;
+
 implementation
 
 end.