* 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
+{$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;