--- a/hedgewars/uTypes.pas	Mon Aug 22 03:57:11 2011 +0200
+++ b/hedgewars/uTypes.pas	Wed Aug 24 12:34:37 2011 +0200
@@ -314,6 +314,11 @@
         chunks: array [TSound] of PMixChunk;
         end;
 
+    TVoice = record
+        snd: TSound;
+        voicepack: PVoicePack;
+        end;
+
     PHHAmmo = ^THHAmmo;
     THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;