synthesizer-midi 0.6.1.1 → 0.6.1.2

raw patch · 5 files changed

+7/−8 lines, 5 filesdep ~containersdep ~deepseqdep ~transformers

Dependency ranges changed: containers, deepseq, transformers

Files

src/Synthesizer/MIDI/CausalIO/ControllerSelection.hs +1/−1
src/Synthesizer/MIDI/CausalIO/Process.hs +1/−2
src/Synthesizer/MIDI/Dimensional/Example/Instrument.hs +1/−1
src/Synthesizer/MIDI/Value/BendWheelPressure.hs +1/−1
synthesizer-midi.cabal +3/−3

src/Synthesizer/MIDI/CausalIO/ControllerSelection.hs view

@@ -71,7 +71,7 @@           (\evs curMap ->              let ctrlEvs =                     fmap (Maybe.mapMaybe (\(cc, val) ->-                       fmap (mapSnd ($val)) $ Map.lookup cc dict)) evs+                       fmap (mapSnd ($ val)) $ Map.lookup cc dict)) evs              in  (PCS.Cons curMap ctrlEvs,                   mapInsertMany                      (concat $ EventListTT.getBodies ctrlEvs)

src/Synthesizer/MIDI/CausalIO/Process.hs view

@@ -296,8 +296,7 @@  instance Monoid NoteOffList where    mempty = NoteOffList (EventListTT.pause mempty)-   mappend (NoteOffList xs) (NoteOffList ys) =-      NoteOffList (mappend xs ys)+   mappend = (<>)  {- | The function defined here are based on the interpretation

src/Synthesizer/MIDI/Dimensional/Example/Instrument.hs view

@@ -72,7 +72,7 @@    do decay <-          fmap (SigC.store dur) $          CtrlR.exponential2 (DN.time 0.4)-      end <- fmap (AnaA.endPrimitive zero) $ fmap ($decay) SigA.embedSampleRate+      end <- fmap (AnaA.endPrimitive zero) $ fmap ($ decay) SigA.embedSampleRate       release <-          SigA.store (DN.time 0.01) $:          (CutR.take (DN.time 0.3) $:

src/Synthesizer/MIDI/Value/BendWheelPressure.hs view

@@ -53,7 +53,7 @@ check chan ev =    sequence $    (fmap (>> get)) $-   msum $ map ($ev) $+   msum $ map ($ ev) $       (fmap (AccState.set bend) . Check.pitchBend chan) :       (fmap (AccState.set wheel) . Check.controller chan VoiceMsg.modulation) :       (fmap (AccState.set pressure) . Check.channelPressure chan) :

synthesizer-midi.cabal view

@@ -1,5 +1,5 @@ Name:           synthesizer-midi-Version:        0.6.1.1+Version:        0.6.1.2 License:        GPL License-File:   LICENSE Author:         Henning Thielemann <haskell@henning-thielemann.de>@@ -19,7 +19,7 @@ Build-Type:     Simple  Source-Repository this-  Tag:         0.6.1.1+  Tag:         0.6.1.2   Type:        darcs   Location:    http://code.haskell.org/synthesizer/midi/ @@ -50,7 +50,7 @@     data-accessor >=0.2.1 && <0.3,     containers >=0.1 && <0.7,     array >=0.1 && <0.6,-    transformers >=0.2 && <0.6,+    transformers >=0.2 && <0.7,     semigroups >=0.1 && <1.0,     utility-ht >=0.0.1 && <0.1