X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fidpool.pas;h=4722be8838635794e913348909d334ba72befdcc;hb=17560801e4b1071897d5e87c1fac53443b209596;hp=7817cc160b259ff91a7eef539205e1276ed1b746;hpb=30f7ce6315b82400548455c6872a271dc1f00f50;p=d2df-sdl.git

diff --git a/src/shared/idpool.pas b/src/shared/idpool.pas
index 7817cc1..4722be8 100644
--- a/src/shared/idpool.pas
+++ b/src/shared/idpool.pas
@@ -14,15 +14,19 @@
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  *)
 {$INCLUDE a_modes.inc}
-{$DEFINE IDPOOL_CHECKS}
+{.$DEFINE IDPOOL_CHECKS}
 unit idpool;
 
 interface
 
+uses
+  mempool;
+
+
 // ////////////////////////////////////////////////////////////////////////// //
 type
   //TODO: implement getting n sequential ids
-  TIdPool = class(TObject)
+  TIdPool = class(TPoolObject)
   public
     const InvalidId = $ffffffff;