DEADSOFTWARE

Sound: Initial OpenAL driver impl
[d2df-sdl.git] / src / lib / openal / al.pas
1 {
2 Translation of the OpenAL headers for FreePascal
3 Copyright (C) 2006 by Ivo Steinmann
4 Copyright (C) 2019 by fgsfds
5 }
7 unit AL;
9 {$mode objfpc}
11 interface
13 uses
14 ctypes;
16 {$IFDEF WINDOWS}
17 {$DEFINE AL_DYNAMIC}
18 {$ENDIF}
20 {$IF DEFINED(AL_DYNAMIC)}
21 const
22 {$IF DEFINED(WINDOWS)}
23 openallib = 'openal32.dll';
24 {$ELSEIF DEFINED(UNIX)}
25 openallib = 'libopenal.so';
26 {$ELSE}
27 {$MESSAGE ERROR 'AL_DYNAMIC not supported'}
28 {$IFEND}
29 {$ELSEIF DEFINED(Darwin)}
30 {$LINKFRAMEWORK OpenAL}
31 {$ELSE}
32 {$LINKLIB openal}
33 {$ENDIF}
35 {$include al.inc}
36 {$include alc.inc}
37 {$include alext.inc}
38 {$include efx.inc}
40 implementation
42 end.