X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=EsounD.git;a=blobdiff_plain;f=examples%2FEsdPlayerExample.hs;fp=examples%2FEsdPlayerExample.hs;h=7de9ba9aa20be036be6c799e8a827d45c1e453a5;hp=0000000000000000000000000000000000000000;hb=332de27c05d195598689979c035bd136a47f4394;hpb=d2396e7b6183bb033861069aaeb52be53a90bfdf

diff --git a/examples/EsdPlayerExample.hs b/examples/EsdPlayerExample.hs
new file mode 100644
index 0000000..7de9ba9
--- /dev/null
+++ b/examples/EsdPlayerExample.hs
@@ -0,0 +1,9 @@
+module Main where
+import Control.Monad.Trans.Region
+import Sound.EsounD.Player 
+
+main ∷ IO ()
+main = runRegionT $
+       do pl ← openPlayer 44100 "localhost" Nothing 
+          fail "FIXME"
+