X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fxparser.pas;h=eb56686ee1daa9c4c9aa83184e4cb8c5226fefad;hb=939cb39acd39a1ca2bf11a0e4a8488c05baf7358;hp=bac4e4a8153feb04faf29362eb0fbfc1295766c1;hpb=dd969f579db2bf70f6ddfcb5d377b2b95b994a6e;p=d2df-sdl.git

diff --git a/src/shared/xparser.pas b/src/shared/xparser.pas
index bac4e4a..eb56686 100644
--- a/src/shared/xparser.pas
+++ b/src/shared/xparser.pas
@@ -19,12 +19,12 @@ unit xparser;
 interface
 
 uses
-  Classes;
+  Classes, mempool;
 
 
 // ////////////////////////////////////////////////////////////////////////// //
 type
-  TTextParser = class
+  TTextParser = class(TPoolObject)
   public
     const
       TTNone = -1;