mmsyn7ukr 0.6.1.0 → 0.6.1.1

raw patch · 6 files changed

+9/−20 lines, 6 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +3/−0
• Main.hs +1/−1
• Processing_mmsyn7ukr.hs +1/−15
• ReplaceP.hs +2/−2
• SoXBasics.hs +1/−1
• mmsyn7ukr.cabal +1/−1

@@ -69,3 +69,6 @@ * Sixth version revised A. Fixed issues with wrongly located information messages,  non-parsed third command line argument. Added a new module ReplaceP. Some minor improvements. +## 0.6.1.1 -- 2020-01-10++* Sixth version revised B. Fixed documentation issues.

@@ -8,7 +8,7 @@ -- A program and a library that can be used as a simple  -- basic interface to some SoX functionality or for producing  -- the approximately Ukrainian speech with your own recorded --- voice (actually it produces needed sound representations).+-- voice (actually it produces the needed sound representations). --  

@@ -8,7 +8,7 @@ -- A program and a library that can be used as a simple  -- basic interface to some SoX functionality or for producing  -- the approximately Ukrainian speech with your own recorded --- voice (actually it produces needed sound representations).+-- voice (actually it produces the needed sound representations). --  module Processing_mmsyn7ukr (@@ -242,18 +242,4 @@ cleanTemp = do   filenames <- getDirectoryContents =<< getCurrentDirectory   let rems = filter (\x -> head x `elem` (['2'..'9'] ++ "_" ++ "x")) filenames in mapM_ removeFile rems---- | Function is used internally to parse a given third command line argument as a @[String]@ representing the Ukrainian sounds, which will be produced.-replaceP :: String -> String-replaceP (x:y:z:u:v:xs) | x == '[' && y == '\"' && z == '[' && u == '\\' && v == '\\' = "[\"\\" ++ replaceP xs-                        | x == ',' && y == '\\' && z == '\\' = "\",\"\\" ++ replaceP (u:v:xs)-                        | x == ']' && y == '\"' && z == ']' = "\"]" ++ replaceP (u:v:xs)-                        | otherwise = x:replaceP (y:z:u:v:xs)-replaceP (x:y:z:u:xs) | x == ',' && y == '\\' && z == '\\' = "\",\"\\" ++ replaceP (u:xs)-                      | x == ']' && y == '\"' && z == ']' = "\"]" ++ replaceP (u:xs)-                      | otherwise = x:replaceP (y:z:u:xs)-replaceP (x:y:z:xs) | x == ',' && y == '\\' && z == '\\' = "\",\"\\" ++ replaceP xs-                    | x == ']' && y == '\"' && z == ']' = "\"]" ++ replaceP xs-                    | otherwise = x:replaceP (y:z:xs)-replaceP xs = xs 

@@ -1,5 +1,5 @@ -- |--- Module      :  Main+-- Module      :  ReplaceP -- Copyright   :  (c) OleksandrZhabenko 2019-2020 -- License     :  MIT --@@ -8,7 +8,7 @@ -- A program and a library that can be used as a simple  -- basic interface to some SoX functionality or for producing  -- the approximately Ukrainian speech with your own recorded --- voice (actually it produces needed sound representations).+-- voice (actually it produces the needed sound representations). --  module ReplaceP where

@@ -8,7 +8,7 @@ -- A program and a library that can be used as a simple  -- basic interface to some SoX functionality or for producing  -- the approximately Ukrainian speech with your own recorded --- voice (actually it produces needed sound representations).+-- voice (actually it produces the needed sound representations). --  

@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                mmsyn7ukr-version:             0.6.1.0+version:             0.6.1.1 synopsis:            A simple basic interface to some SoX functionality or to produce a voice that can be used by mmsyn7h description:         A program and a library that can be used as a simple basic interface to some SoX functionality or to produce your voice in Ukrainian (if you pronounce the sounds properly) represented by the separate sounds or something special like soft sign. homepage:            https://hackage.haskell.org/package/mmsyn7ukr