music-dynamics-literal 1.6.2 → 1.7

raw patch · 2 files changed

+13/−3 lines, 2 filesdep +semigroupsPVP ok

version bump matches the API change (PVP)

Dependencies added: semigroups

API changes (from Hackage documentation)

Files

• music-dynamics-literal.cabal +3/−2
• src/Music/Dynamics/Literal.hs +10/−1

@@ -1,6 +1,6 @@  name:                   music-dynamics-literal-version:                1.6.2+version:                1.7 author:                 Hans Hoglund maintainer:             Hans Hoglund license:                BSD3@@ -22,7 +22,8 @@   location:         git://github.com/music-suite/music-dynamics-literal.git  library-    build-depends:      base >= 4 && < 5+    build-depends:      base            >= 4        && < 5,+                        semigroups      >= 0.13.0.1 && < 1     exposed-modules:    Music.Dynamics.Literal     hs-source-dirs:     src     default-language:   Haskell2010

@@ -24,6 +24,9 @@         sffz, sfz, fz, rfz, fp   ) where +import Data.Semigroup+import Control.Applicative+ -- |  -- Dynamics literal. --@@ -49,7 +52,13 @@     fromDynamics = id  instance IsDynamics a => IsDynamics (Maybe a) where-    fromDynamics = Just . fromDynamics+    fromDynamics = pure . fromDynamics++instance (Monoid b, IsDynamics a) => IsDynamics (b, a) where+    fromDynamics = pure . fromDynamics++instance IsDynamics a => IsDynamics [a] where+    fromDynamics = pure . fromDynamics  instance IsDynamics Double where     fromDynamics (DynamicsL (Just x, _)) = x