易音频利用SDL2的非常基本的音频播放库。这是一个初始化SDL、初始化EasyAudio、加载音频文件、播放音频文件，然后关闭所有内容的示例程序。


import Control.Monad (when)

import EasyAudio

import Graphics.UI.SDL as SDL



main :: IO ()

main = do

  r <- SDL.init SDL.SDL_INIT_AUDIO

  when (r < 0) (error \" Error initializing SDL \")

  putStrLn \" Initialized SDL \"

  (loadClip, cleanup) <- easyAudio

  vader <- loadClip \" swvader0\"