simple allocation counter for classes

[d2df-sdl.git] / src / game / g_playermodel.pas

diff --git a/src/game/g_playermodel.pas b/src/game/g_playermodel.pas
index 9e42436ec5a4440f619ec289298c2cf20444f451..b8d0ec6c7ef4b74d3f1c54c6a7297af846029d88 100644 (file)
--- a/src/game/g_playermodel.pas
+++ b/src/game/g_playermodel.pas
@@ -20,6 +20,7 @@ unit g_playermodel;
 interface
 
 uses
+  mempool,
   MAPDEF, g_textures, g_basic, g_weapons, e_graphics, wadreader;
 
 const
@@ -81,7 +82,7 @@ type
                   Array [A_STAND..A_LAST] of
                   Array [D_LEFT..D_RIGHT] of Array of TDFPoint;
 
-  TPlayerModel = class (TObject)
+  TPlayerModel = class(TPoolObject)
   private
     FName:             String;
     FDirection:        TDirection;