@@ -1,7 +1,6 @@
1module Control.Stream
1module Control.Stream
3 , EffStream
3 , EffStream
@@ -25,6 +24,7 @@ module Control.Stream
25 , createSink
24 , createSink
26 , createCombinator
25 , createCombinator
27 , createEventCombinator
26 , createEventCombinator
27+ , createEndCombinator
28 , getSource
28 , getSource
29 , runSource
29 , runSource
30 -- Combinators
30 -- Combinators
@@ -45,6 +45,7 @@ module Control.Stream
46 , constant
46 , constant
48 -- Stream factories
49 -- Stream factories
50 , fromArray
51 , fromArray
@@ -74,7 +75,6 @@ newtype Time = Time Int
74foreign import data STREAM :: !
75foreign import data STREAM :: !
76type EffStream e a = Eff (stream :: STREAM | e) a
77type EffStream e a = Eff (stream :: STREAM | e) a
77−type PureStream a = EffStream () a
79newtype Stream a = Stream { source :: Source a }
79newtype Stream a = Stream { source :: Source a }