EsdPlayerExample (only a skeleton for now)

[EsounD.git] / examples / EsdPlayerExample.hs

diff --git a/examples/EsdPlayerExample.hs b/examples/EsdPlayerExample.hs
new file mode 100644 (file)
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"
+