packages feed

mmsyn7l 0.2.0.0 → 0.2.1.0

raw patch · 3 files changed

+14/−7 lines, 3 filesdep ~mmsyn7ukrPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: mmsyn7ukr

API changes (from Hackage documentation)

Files

CHANGELOG.md view
@@ -22,3 +22,9 @@ obtained e. g. from the usage of mmsyn7s package (for more information,  please, refer to: https://hackage.haskell.org/package/mmsyn7s). +## 0.2.1.0 -- 2020-01-13++* Second version revised A. Fixed issues with wrongly parsed sounds that are represented+by two letters ("дж", "дз", "сь", "ць").++
Main.hs view
@@ -15,7 +15,7 @@ import qualified Data.Vector as V import CaseBi (getBFst') import System.Environment (getArgs)-import ReplaceP+import ReplaceP (replaceP, replaceP2, replaceP3)  -- | The main and the only one function in the module. If you specify a one command line argument, which can be obtained by running @mmsyn7s@ program -- with the needed to be sounded (with sound representations) Ukrainian text (please, refer to: https://hackage.haskell.org/package/mmsyn7s).@@ -36,14 +36,15 @@     else do       putStrLn "Now you can change the amplitude of the needed sound representations of the Ukrainian sounds (or something similar). "       putStrLn ""-      let xs = concat . take 1 $ args-          rrs = show . head $ [[xs]]+      let xs = take 1 $ args+          rrs = show xs           list = read (replaceP rrs)::[String]+          zss = read (replaceP3 . replaceP2 . show $ list)::[String]           wws = map (getBFst' ("0.wav", V.fromList . zip ["а","б","в","г","д","дж","дз","е","ж","з","и","й","к","л","м","н","о","п","р","с",                        "сь","т","у","ф","х","ц","ць","ч","ш","ь","і","ґ"] $ ["A.wav", "B.wav", "C.wav", "D.wav", "E.wav", "F.wav", "G.wav", "H.wav",                           "I.wav", "J.wav", "K.wav", "L.wav", "M.wav", "N.wav", "O.wav", "P.wav", "Q.wav", "R.wav",                             "S.wav", "T.wav", "U.wav", "V.wav", "W.wav", "X.wav", "Y.wav", "Z.wav", "a.wav", "b.wav", "c.wav", -                             "d.wav", "e.wav", "f.wav"])) list+                             "d.wav", "e.wav", "f.wav"])) zss       mapM_ changeVolume wws       putStrLn ""       putStrLn "Now you have changed (or left unchanged) the amplitudes for the needed sound representations for the Ukrainian language. "
mmsyn7l.cabal view
@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                mmsyn7l-version:             0.2.0.0+version:             0.2.1.0 synopsis:            Modifies the amplitude of the sound representations for the Ukrainian language created by mmsyn7ukr package. description:         A program and a library to modify the amplitude of the sound representations for the Ukrainian language created by mmsyn7ukr package or somehow otherwise. homepage:            https://hackage.haskell.org/package/mmsyn7l@@ -20,7 +20,7 @@   exposed-modules:     Main, MMSyn7l   -- other-modules:   -- other-extensions:-  build-depends:       base >=4.7 && <4.14, directory >=1 && <1.5, mmsyn7ukr >=0.6.1.1 && <1, vector >=0.11 && <0.14, mmsyn2 >=0.1.7 && <1+  build-depends:       base >=4.7 && <4.14, directory >=1 && <1.5, mmsyn7ukr >=0.6.2.1 && <1, vector >=0.11 && <0.14, mmsyn2 >=0.1.7 && <1   -- hs-source-dirs:   default-language:    Haskell2010 @@ -28,6 +28,6 @@   main-is:             Main.hs   -- other-modules:   -- other-extensions:-  build-depends:       base >=4.7 && <4.14, directory >=1 && <1.5, mmsyn7ukr >=0.6.1.1 && <1, vector >=0.11 && <0.14, mmsyn2 >=0.1.7 && <1+  build-depends:       base >=4.7 && <4.14, directory >=1 && <1.5, mmsyn7ukr >=0.6.2.1 && <1, vector >=0.11 && <0.14, mmsyn2 >=0.1.7 && <1   -- hs-source-dirs:   default-language:    Haskell2010