X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fidpool.pas;h=c9bd791fe9f08f2f04cb60a920e3a797e0d86fa7;hb=3b0245ddd953aba25d8e71ab85232ef4600d1138;hp=8cb99e6fca1775be4b4854fcbb4f9ddbb3cbed7a;hpb=31c92166ce1ba9decf93e39f77e77833f879c4b4;p=d2df-sdl.git

diff --git a/src/shared/idpool.pas b/src/shared/idpool.pas
index 8cb99e6..c9bd791 100644
--- a/src/shared/idpool.pas
+++ b/src/shared/idpool.pas
@@ -1,4 +1,4 @@
-(* Copyright (C)  DooM 2D:Forever Developers
+(* Copyright (C)  Doom 2D: Forever Developers
  *
  * This program is free software: you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -19,10 +19,16 @@ unit idpool;
 
 interface
 
+{$IFDEF USE_MEMPOOL}
+uses
+  mempool;
+{$ENDIF}
+
+
 // ////////////////////////////////////////////////////////////////////////// //
 type
   //TODO: implement getting n sequential ids
-  TIdPool = class(TObject)
+  TIdPool = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF}
   public
     const InvalidId = $ffffffff;