X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Flib%2Fsdl2%2Fsdl2.pas;h=18fd044137f006ed6357e419f28dae052274da01;hb=ac201b02f10ef558087d50f6b03b4519ab567558;hp=4f1dfcaa0ac320d8801649d1d2331a6a67d9a867;hpb=423556f23c02a18964bd2c1e125516c0c902ca46;p=d2df-sdl.git

diff --git a/src/lib/sdl2/sdl2.pas b/src/lib/sdl2/sdl2.pas
index 4f1dfca..18fd044 100644
--- a/src/lib/sdl2/sdl2.pas
+++ b/src/lib/sdl2/sdl2.pas
@@ -1,3 +1,4 @@
+{$MODE DELPHI}
 unit SDL2;
 
 {
@@ -141,7 +142,7 @@ interface
       X,
       XLib;
   {$ENDIF}
-  
+
   {$IFDEF DARWIN}
     uses
       X,
@@ -241,7 +242,7 @@ end;
 //from "sdl_mouse.h"
 function SDL_Button(button: SInt32): SInt32;
 begin
-  Result := 1 shl (button - 1); 
+  Result := 1 shl (button - 1);
 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;
-  
+
 function SDL_AUDIO_BITSIZE(x: Cardinal): Cardinal;
 begin
   Result := x and SDL_AUDIO_MASK_BITSIZE;