diff -r f7ed1ea25050 -r 538a777f90c4 hedgewars/uSound.pas --- a/hedgewars/uSound.pas Sun Oct 11 16:23:59 2009 +0000 +++ b/hedgewars/uSound.pas Sun Oct 11 20:14:55 2009 +0000 @@ -59,7 +59,7 @@ function soundFadeOut(snd: TSound; qt: LongInt; voicepack: PVoicepack): LongInt; {*remember: LongInt = 32bit; integer = 16bit; byte = 8bit*} -function openal_init (hardware: LongInt; memsize: LongInt) : boolean; cdecl; external OpenALBridge; +function openal_init (filename: PChar; hardware: boolean; memsize: LongInt) : boolean; cdecl; external OpenALBridge; function openal_close : boolean; cdecl; external OpenALBridge; function openal_loadfile (const filename: PChar) : LongInt; cdecl; external OpenALBridge; function openal_toggleloop (index: LongInt) : boolean; cdecl; external OpenALBridge; @@ -107,7 +107,8 @@ {*sound works in ipodtouch only if LAND_WIDTH = 1024; LAND_HEIGHT = 512; or if ogg are loaded in stream or if sound is loaded by demand*} WriteToConsole('Init OpenAL sound...'); -if isSoundHardware then isSoundEnabled:= openal_init(1, numSounds) else isSoundEnabled:= openal_init(0, numSounds); + +isSoundEnabled:= openal_init(str2pchar(ParamStr(0)), isSoundHardware, numSounds); if isSoundEnabled then WriteLnToConsole(msgOK) else WriteLnToConsole(msgFailed);