moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2025-01-11 13:48:27 -05:00
Code Issues Releases Wiki Activity

So much for testing compilation

Browse Source 
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@564 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
Wizzup? 2010-02-27 22:01:13 +00:00
parent 7c081c53b2
commit 4a349c69a8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
trunk/Units/MMLAddon/PSInc/Wrappers/other.inc
View File

@ -47,12 +47,12 @@ begin
{$ifdef MSWINDOWS} {$ifdef MSWINDOWS}
sndPlaySound(PChar(sound),SND_ASYNC or SND_NODEFAULT); sndPlaySound(PChar(sound),SND_ASYNC or SND_NODEFAULT);
{$else} {$else}
Writeln(Format('Playing sound %s (not supported yet on Linux)',[sound]); Writeln(Format('Playing sound %s (not supported yet on Linux)',[sound]));
{$endif} {$endif}
end; end;
Procedure StopSound; extdecl; Procedure StopSound; extdecl;
begin; begin
{$ifdef MSWINDOWS} {$ifdef MSWINDOWS}
sndPlaySoundW(nil,0); sndPlaySoundW(nil,0);
{$else} {$else}