midi 0.1.7 → 0.1.7.1
raw patch · 2 files changed
+4/−4 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Sound.MIDI.Message.Channel.Mode: fromControllerValue :: Integral a => (a, a) -> (Maybe UserMessage, T)
+ Sound.MIDI.Message.Channel.Mode: fromControllerValue :: (Show a, Integral a) => (a, a) -> (Maybe UserMessage, T)
Files
- midi.cabal +2/−2
- src/Sound/MIDI/Message/Channel/Mode.hs +2/−2
midi.cabal view
@@ -1,5 +1,5 @@ Name: midi-Version: 0.1.7+Version: 0.1.7.1 License: GPL License-File: LICENSE Author: Henning Thielemann <haskell@henning-thielemann.de>@@ -30,7 +30,7 @@ Source-Repository this type: darcs location: http://code.haskell.org/~thielema/midi/- tag: 0.1.7+ tag: 0.1.7.1 Flag splitBase description: Choose the new smaller, split-up base package.
src/Sound/MIDI/Message/Channel/Mode.hs view
@@ -56,7 +56,7 @@ This function is also used in alsa-midi, we could give it the result type @Parser.PossiblyIncomplete T@ otherwise. -}-fromControllerValue :: Integral a => (a, a) -> (Maybe UserMessage, T)+fromControllerValue :: (Show a, Integral a) => (a, a) -> (Maybe UserMessage, T) fromControllerValue (mode,x) = case mode of 0x78 ->@@ -86,7 +86,7 @@ checkValidValue ::- Integral a => String -> [a] -> a -> Maybe UserMessage+ (Show a, Integral a) => String -> [a] -> a -> Maybe UserMessage checkValidValue name validValues value = toMaybe (not (elem value validValues))