csound-expression 3.0.0 → 3.0.1

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• csound-expression.cabal +1/−1
• src/Csound/Control/Evt.hs +1/−1

@@ -1,5 +1,5 @@ Name:          csound-expression-Version:       3.0.0+Version:       3.0.1 Cabal-Version: >= 1.6 License:       BSD3 License-file:  LICENSE

@@ -111,7 +111,7 @@ -- -- When value @a@ happens with @evt@, the resulting event stream contains -- a value (z `f` a) and in the next time @z@ equals to this value.-appendE :: Tuple a => a -> (a -> a -> a) => Evt a -> Evt a+appendE :: Tuple a => a -> (a -> a -> a) -> Evt a -> Evt a appendE empty append = accumE empty phi     where phi a s = let s1 = s `append` a in (s1, s1)