--- a/hedgewars/uTypes.pas	Sun Aug 21 15:11:00 2011 -0400
+++ b/hedgewars/uTypes.pas	Sun Aug 21 19:29:04 2011 -0400
@@ -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;