Module Sdl.Audio

module Audio: sig .. end

type t = Sdlaudio.t 
type format = Sdlaudio.format = 
| AUDIO_U8
| AUDIO_S8
| AUDIO_U16LSB
| AUDIO_S16LSB
| AUDIO_U16MSB
| AUDIO_S16MSB
| AUDIO_U16
| AUDIO_S16
| AUDIO_S32LSB
| AUDIO_S32MSB
| AUDIO_S32
| AUDIO_F32LSB
| AUDIO_F32MSB
| AUDIO_F32
| AUDIO_U16SYS
| AUDIO_S16SYS
| AUDIO_S32SYS
| AUDIO_F32SYS
val get_drivers : unit -> string array
val init : driver_name:string -> unit
val quit : unit -> unit
val get_current_driver : unit -> string
type status = Sdlaudio.status = 
| Stopped
| Playing
| Paused
val get_status : unit -> status
val string_of_status : status -> string
val pause : pause_on:bool -> unit
val lock : unit -> unit
val unlock : unit -> unit
val close : unit -> unit
type audio_spec = Sdlaudio.audio_spec 
val new_audio_spec : unit -> audio_spec
val free_audio_spec : audio_spec -> unit
type audio_buffer = Sdlaudio.audio_buffer 
val load_wav : filename:string ->
spec:audio_spec -> audio_buffer * int32
val free_wav : audio_buffer -> unit
type audio_device_id = Sdlaudio.audio_device_id 
val open_audio_device_simple : audio_spec -> audio_device_id
val queue_audio : audio_device_id -> audio_buffer -> int32 -> unit
val unpause_audio_device : audio_device_id -> unit
val pause_audio_device : audio_device_id -> unit
val close_audio_device : audio_device_id -> unit