X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_sound_sdl.inc;h=1b8d376aa72f82076369d611ddc245ba10bd0a50;hb=e4428a8db7c2b8d6889878e0634bce6964f9fe85;hp=4bac2308a9e6020d3af28e07a703a446732e5f5a;hpb=5472594f32e33da0c66606ec9eebc8f798ef6b54;p=d2df-sdl.git diff --git a/src/engine/e_sound_sdl.inc b/src/engine/e_sound_sdl.inc index 4bac230..1b8d376 100644 --- a/src/engine/e_sound_sdl.inc +++ b/src/engine/e_sound_sdl.inc @@ -18,6 +18,7 @@ interface uses sdl2, SDL2_mixer, + {$IFDEF USE_MEMPOOL}mempool,{$ENDIF} e_log, SysUtils; @@ -30,7 +31,7 @@ type nRefs: Integer; end; - TBasicSound = class (TObject) + TBasicSound = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF} private FChanNum: Integer; // <0: no channel allocated