mmsyn7s 0.3.0.1 → 0.3.1.0
raw patch · 4 files changed
+24/−8 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGELOG.md +5/−0
- MMSyn7s.hs +13/−5
- README.markdown +5/−2
- mmsyn7s.cabal +1/−1
CHANGELOG.md view
@@ -22,3 +22,8 @@ ## 0.3.0.1 -- 2020-02-25 * Third version revised A. Improved formatting for the README.markdown file.++## 0.3.1.0 -- 2020-02-25++* Third version revised B. Separated the "1" option into two different ones: "1" and "-1", each of which prints either a list of Strings or the rest of the text being+treated partially till the first duplicated Ukrainian sound representation (except the silent ones). Improved formatting for the documentation.
MMSyn7s.hs view
@@ -38,16 +38,22 @@ -- and prints the sorted list of the Ukrainian sounds representations that can be used further in mmsyn7 series of programs. -- -- Depending on the first command line argument the program behaves as follows:+-- -- \"-h\" -- prints help and exits;+-- -- \"-v\" -- prints version number and exits;+-- -- \"1\" -- prints the list of String being unique (without silence) and then the rest of the text with whitespaces and some phonetical conversions;+-- +-- \"-1\" -- prints the rest of the text after the first duplicated sound representation (except silent ones) including it with whitespaces and some phonetical conversions;+-- -- \"0\" -- prints the list of String for the whole text.+-- -- All other variants of the beginning for the command line arguments are the same as \"0\" (the arguments are treated as a Ukrainian text -- and processed as a whole one object). main7s :: IO () main7s = do texts <- getArgs- putStrLn "" let arg1 = concat . take 1 $ texts in case arg1 of "-h" -> do { putStrLn "mmsyn7s: "@@ -59,13 +65,15 @@ ; putStrLn "mmsyn7s {Ukrainian text}" ; putStrLn "where the first one prints this help message; " ; putStrLn " the second one prints a version number; "- ; putStrLn " the \"1\" option prints the list of String being unique (without silence) and then the rest of the text with whitespaces and some phonetical conversions; "+ ; putStrLn " the \"1\" option prints the list of String being unique (without silence)"+ ; putStr " the \"-1\" option prints the rest of the text after the first duplicated sound representation (except silent ones) "+ ; putStrLn "including it with whitespaces and some phonetical conversions; " ; putStrLn " the \"0\" option prints the list of String for the whole text" ; putStrLn " the other beginning is equivalent to the previous one behaviour." }- "-v" -> putStrLn "mmsyn7s: version 0.3.0.1"- "1" -> do { putStrLn . show . fst . show7s5 . unwords . drop 1 $ texts- ; putStrLn . snd . show7s5 . unwords . drop 1 $ texts }+ "-v" -> putStrLn "mmsyn7s: version 0.3.1.0"+ "1" -> putStrLn . show . fst . show7s5 . unwords . drop 1 $ texts+ "-1" -> putStrLn . snd . show7s5 . unwords . drop 1 $ texts "0" -> putStrLn . show7s2 . unwords . drop 1 $ texts _ -> putStrLn . show7s2 . unwords $ texts
README.markdown view
@@ -13,8 +13,11 @@ "-v" -- prints version number and exits; -"1" -- prints the list of String being unique (without silence) and then-the rest of the text with whitespaces;+"1" -- prints the list of String being unique (without silence);++"-1" -- prints the rest of the text after the first duplicated sound+representation (except silent ones) including it with whitespaces and+some phonetical conversions; "0" -- prints the list of String for the whole text.
mmsyn7s.cabal view
@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/ name: mmsyn7s-version: 0.3.0.1+version: 0.3.1.0 synopsis: Shows a sorted list of the Ukrainian sounds representations that can be used by mmsyn7 series of programs description: A program and a library that show a sorted list of the Ukrainian sounds representations that can be used by mmsyn7 series of programs homepage: https://hackage.haskell.org/package/mmsyn7s