X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Flib%2Ffluidsynth%2Ffluidsynth.pas;h=37a610e34470947b4a410125a1f62c10beaf16e1;hb=38c57c930ec47a8cb5da5a2d0e7bdaa5c1e3a89a;hp=6a8c34f3fff4ee44b2a005c00c3862fd9d1d95e3;hpb=17e9f4016e2d4d9599493f968c17f6a8c15031e6;p=d2df-sdl.git

diff --git a/src/lib/fluidsynth/fluidsynth.pas b/src/lib/fluidsynth/fluidsynth.pas
index 6a8c34f..37a610e 100644
--- a/src/lib/fluidsynth/fluidsynth.pas
+++ b/src/lib/fluidsynth/fluidsynth.pas
@@ -20,6 +20,7 @@ uses
   {$ENDIF}
 {$ELSEIF DEFINED(UNIX)}
   {$DEFINE FS_DYNAMIC}
+  {$LINKLIB libfluidsynth}
   const fluidlib = 'libfluidsynth.so';
 {$ELSE}
   {$ERROR fluidsynth not supported on this platform. Fix it!}
@@ -28,6 +29,7 @@ uses
 const
   FLUID_OK = 0;
   FLUID_FAILED = -1;
+  FLUID_PLAYER_DONE = 2;
 
 type
   pfluid_settings_t = pointer;
@@ -53,6 +55,7 @@ function new_fluid_synth(settings: pfluid_settings_t): pfluid_synth_t; cdecl; ex
 function delete_fluid_synth(synth: pfluid_synth_t): cint; cdecl; external {$IFDEF FS_DYNAMIC}fluidlib{$ENDIF};
 function fluid_synth_get_settings(synth: pfluid_synth_t): pfluid_settings_t; cdecl; external {$IFDEF FS_DYNAMIC}fluidlib{$ENDIF};
 function fluid_synth_sfload(synth: pfluid_synth_t; fname: pchar; reset: cint): cint; cdecl; external {$IFDEF FS_DYNAMIC}fluidlib{$ENDIF};
+function fluid_synth_system_reset(synth: pfluid_synth_t): cint; cdecl; external {$IFDEF FS_DYNAMIC}fluidlib{$ENDIF};
 
 function fluid_synth_write_s16(synth: pfluid_synth_t; len: cint; lout: pointer; loff, linc: cint; rout: pointer; roff, rinc: cint): cint; cdecl; external {$IFDEF FS_DYNAMIC}fluidlib{$ENDIF};