X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2FCONFIG.pas;h=139529084d4f6d675c0d4ffaf98b279673f526ff;hb=08252081c18bbe84c7d5d1a8a62c8ca3c5275f0a;hp=155ebacabbeee0357f7e6fbd21225d2541c014f8;hpb=31d174a428ef1235e1708b0738804b47e006cf5c;p=d2df-sdl.git diff --git a/src/shared/CONFIG.pas b/src/shared/CONFIG.pas index 155ebac..1395290 100644 --- a/src/shared/CONFIG.pas +++ b/src/shared/CONFIG.pas @@ -1,9 +1,8 @@ -(* 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 - * the Free Software Foundation, either version 3 of the License, or - * (at your option) any later version. + * the Free Software Foundation, version 3 of the License ONLY. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of @@ -16,16 +15,12 @@ {$INCLUDE a_modes.inc} unit CONFIG; -{ ------------------------------------ -CONFIG.PAS ÂÅÐÑÈß ÎÒ 24.09.06 ------------------------------------ -} - interface +{$IFDEF USE_MEMPOOL} uses mempool; +{$ENDIF} type TParam = record @@ -34,7 +29,7 @@ type Section: Word; end; - TConfig = class(TPoolObject) + TConfig = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF} private FParams: array of TParam; FSections: array of ShortString; @@ -61,7 +56,7 @@ type implementation uses - SysUtils, BinEditor; + SysUtils, utils; { TConfig }