hedgewars/uSound.pas
changeset 11500 3a4026fe7c18
parent 11499 9c5d9993b14b
child 11507 bd9a2f1b0080
equal deleted inserted replaced
11499:9c5d9993b14b 11500:3a4026fe7c18
   308         exit;
   308         exit;
   309     WriteToConsole('Init sound...');
   309     WriteToConsole('Init sound...');
   310     success:= SDL_InitSubSystem(SDL_INIT_AUDIO) >= 0;
   310     success:= SDL_InitSubSystem(SDL_INIT_AUDIO) >= 0;
   311 
   311 
   312     if success then
   312     if success then
   313         success:= Mix_OpenAudio(44100, AUDIO_S16LSB, channels, 1024) = 0;
   313         success:= Mix_OpenAudio(44100, MIX_DEFAULT_FORMAT, channels, 1024) = 0;
   314 
   314 
   315     if success then
   315     if success then
   316         WriteLnToConsole(msgOK)
   316         WriteLnToConsole(msgOK)
   317     else
   317     else
   318     begin
   318     begin