X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fidpool.pas;h=c9bd791fe9f08f2f04cb60a920e3a797e0d86fa7;hb=08095f30d97fe8ca473173173df6158aa352f64a;hp=7817cc160b259ff91a7eef539205e1276ed1b746;hpb=30f7ce6315b82400548455c6872a271dc1f00f50;p=d2df-sdl.git diff --git a/src/shared/idpool.pas b/src/shared/idpool.pas index 7817cc1..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 @@ -14,15 +14,21 @@ * along with this program. If not, see . *) {$INCLUDE a_modes.inc} -{$DEFINE IDPOOL_CHECKS} +{.$DEFINE IDPOOL_CHECKS} 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;