From: DeaDDooMER <deaddoomer@deadsoftware.ru>
Date: Sun, 1 Sep 2019 20:34:22 +0000 (+0300)
Subject: fix building on linux with mpg123
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=279b02d4b35adcc253ec97ea4f4a9b8c2da5df52;p=d2df-sdl.git

fix building on linux with mpg123
---

diff --git a/src/engine/e_soundfile_mp3.pas b/src/engine/e_soundfile_mp3.pas
index 5f60a86..2870cbe 100644
--- a/src/engine/e_soundfile_mp3.pas
+++ b/src/engine/e_soundfile_mp3.pas
@@ -151,7 +151,8 @@ end;
 
 function TMP3Loader.LoadStream(Stream: TStream; SStreaming: Boolean): Boolean;
 var
-  SRate, SEnc, SChans: LongInt;
+  SRate: clong;
+  SEnc, SChans: LongInt;
 begin
   FMPG := mpg123_new(nil, nil);
   if FMPG = nil then
diff --git a/src/lib/mpg123/mpg123.pas b/src/lib/mpg123/mpg123.pas
index 40ccc92..f928c83 100644
--- a/src/lib/mpg123/mpg123.pas
+++ b/src/lib/mpg123/mpg123.pas
@@ -53,7 +53,8 @@ type
   ppclong = ^pclong;
   pcsize_t = ^csize_t;
   ppcint = ^pcint;
-  off_t = cint;
+(* off_t = cint; *)
+  off_t = coff_t;
   ppoff_t = ^poff_t;
   poff_t = ^coff_t;
   ppcuchar = ^pcuchar;