Hooray! The player example actually played a sound!

[EsounD.git] / Sound / EsounD / Streams.hs

diff --git a/Sound/EsounD/Streams.hs b/Sound/EsounD/Streams.hs
index b379afb0e9f6724fc097e342e1b3220eabc4abe4..216fdafda4cf4b2f21284a5260fe5c7bc3e10a34 100644 (file)
--- a/Sound/EsounD/Streams.hs
+++ b/Sound/EsounD/Streams.hs
@@ -5,15 +5,13 @@
 -- | EsounD stream I/O
 module Sound.EsounD.Streams
     ( Writable(..)
-    , Mux(..) -- defined by Internals
     )
     where
 import Control.Monad.IO.Class
 import Control.Monad.Trans.Region
-import Sound.EsounD.Internals
 
 class Writable ws dvec where
     write ∷ ( AncestorRegion pr cr
              , MonadIO cr
              )
-          ⇒ ws (RegionT s pr) → dvec → cr ()
+          ⇒ ws pr → dvec → cr ()