diff --git a/src/lib/sdl2/sdl2.pas b/src/lib/sdl2/sdl2.pas
index 4f1dfcaa0ac320d8801649d1d2331a6a67d9a867..168742e872eb3b411f2d7060755c914e5aa15251 100644 (file)
--- a/src/lib/sdl2/sdl2.pas
+++ b/src/lib/sdl2/sdl2.pas
+{$MODE DELPHI}
unit SDL2;
{
unit SDL2;
{
Windows;
{$ENDIF}
Windows;
{$ENDIF}
- {$IFDEF LINUX}
+ {$IFDEF UNIX}
uses
X,
XLib;
{$ENDIF}
uses
X,
XLib;
{$ENDIF}
-
+
{$IFDEF DARWIN}
uses
X,
{$IFDEF DARWIN}
uses
X,
//from "sdl_mouse.h"
function SDL_Button(button: SInt32): SInt32;
begin
//from "sdl_mouse.h"
function SDL_Button(button: SInt32): SInt32;
begin
- Result := 1 shl (button - 1);
+ Result := 1 shl (button - 1);
end;
{$IFDEF WINDOWS}
end;
{$IFDEF WINDOWS}
@@ -303,7 +304,7 @@ function SDL_LoadWAV(_file: PAnsiChar; spec: PSDL_AudioSpec; audio_buf: PPUInt8;
begin
Result := SDL_LoadWAV_RW(SDL_RWFromFile(_file, 'rb'), 1, spec, audio_buf, audio_len);
end;
begin
Result := SDL_LoadWAV_RW(SDL_RWFromFile(_file, 'rb'), 1, spec, audio_buf, audio_len);
end;
-
+
function SDL_AUDIO_BITSIZE(x: Cardinal): Cardinal;
begin
Result := x and SDL_AUDIO_MASK_BITSIZE;
function SDL_AUDIO_BITSIZE(x: Cardinal): Cardinal;
begin
Result := x and SDL_AUDIO_MASK_BITSIZE;