aboutsummaryrefslogtreecommitdiffstats
path: root/src/Classes/UMediaCore_SDL.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/Classes/UMediaCore_SDL.pas')
-rw-r--r--src/Classes/UMediaCore_SDL.pas38
1 files changed, 0 insertions, 38 deletions
diff --git a/src/Classes/UMediaCore_SDL.pas b/src/Classes/UMediaCore_SDL.pas
deleted file mode 100644
index 252f72a0..00000000
--- a/src/Classes/UMediaCore_SDL.pas
+++ /dev/null
@@ -1,38 +0,0 @@
-unit UMediaCore_SDL;
-
-interface
-
-{$IFDEF FPC}
- {$MODE Delphi}
-{$ENDIF}
-
-{$I switches.inc}
-
-uses
- UMusic,
- sdl;
-
-function ConvertAudioFormatToSDL(Format: TAudioSampleFormat; out SDLFormat: UInt16): boolean;
-
-implementation
-
-function ConvertAudioFormatToSDL(Format: TAudioSampleFormat; out SDLFormat: UInt16): boolean;
-begin
- case Format of
- asfU8: SDLFormat := AUDIO_U8;
- asfS8: SDLFormat := AUDIO_S8;
- asfU16LSB: SDLFormat := AUDIO_U16LSB;
- asfS16LSB: SDLFormat := AUDIO_S16LSB;
- asfU16MSB: SDLFormat := AUDIO_U16MSB;
- asfS16MSB: SDLFormat := AUDIO_S16MSB;
- asfU16: SDLFormat := AUDIO_U16;
- asfS16: SDLFormat := AUDIO_S16;
- else begin
- Result := false;
- Exit;
- end;
- end;
- Result := true;
-end;
-
-end.