phonetic-languages-simplified-examples-array 0.14.0.0 → 0.14.1.0
raw patch · 5 files changed
+8/−4 lines, 5 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGELOG.md +4/−0
- GetInfo/Main.hs +1/−1
- Lines/Main.hs +1/−1
- Simple/Main.hs +1/−1
- phonetic-languages-simplified-examples-array.cabal +1/−1
CHANGELOG.md view
@@ -169,3 +169,7 @@ * The fourteenth version. Fixed the not very sufficient release candidate that used hashing functionality. If you have not upgraded to the hashing functionality during the 2021-10-30--2021-10-31 you do not need to upgrade either.++## 0.14.1.0 -- 2021-11-01++* The fourteenth version revised A. Fixed issues with doubling the input command line arguments to some extent.
GetInfo/Main.hs view
@@ -30,7 +30,7 @@ main :: IO () main = do args50 <- getArgs- let !args0000 = filter (/= "+p") . (\xss -> takeWhile (/= "+d") xss `mappend` drop 2 (takeWhile (/= "+d") xss)) $ args50+ let !args0000 = filter (/= "+p") . (\xss -> takeWhile (/= "+d") xss `mappend` drop 2 (dropWhile (/= "+d") xss)) $ args50 !pairwisePermutations = any (== "+p") args50 !fileDu = concat . drop 1 . take 2 . dropWhile (/= "+d") $ args50 !args000 = filter (\ts -> take 2 ts /= "+x" && take 2 ts /= "+g") args0000
Lines/Main.hs view
@@ -50,7 +50,7 @@ main :: IO () main = do args50 <- getArgs- let args00 = filter (/= "+p") . (\xss -> takeWhile (/= "+d") xss `mappend` drop 2 (takeWhile (/= "+d") xss)) $ args50+ let args00 = filter (/= "+p") . (\xss -> takeWhile (/= "+d") xss `mappend` drop 2 (dropWhile (/= "+d") xss)) $ args50 pairwisePermutations = any (== "+p") args50 fileDu = concat . drop 1 . take 2 . dropWhile (/= "+d") $ args50 multiple
Simple/Main.hs view
@@ -34,7 +34,7 @@ main :: IO () main = do args50 <- getArgs- let args0000 = filter (/= "+p") . (\xss -> takeWhile (/= "+d") xss `mappend` drop 2 (takeWhile (/= "+d") xss)) $ args50+ let args0000 = filter (/= "+p") . (\xss -> takeWhile (/= "+d") xss `mappend` drop 2 (dropWhile (/= "+d") xss)) $ args50 pairwisePermutations = any (== "+p") args50 fileDu = concat . drop 1 . take 2 . dropWhile (/= "+d") $ args50 args000 = filter (not . null) (takeWhile (\xs -> take 2 xs /= "*t") args0000 `mappend` (drop 1 . dropWhile (\xs -> take 2 xs /= "^t") $ args0000))
phonetic-languages-simplified-examples-array.cabal view
@@ -2,7 +2,7 @@ -- further documentation, see http://haskell.org/cabal/users-guide/ name: phonetic-languages-simplified-examples-array-version: 0.14.0.0+version: 0.14.1.0 synopsis: Helps to create Ukrainian texts with the given phonetic properties. description: Uses more functionality of the arrays and lists. The vector-related functionality is removed and this made the executables and libraries much more lightweight. Deal the Ukrainian as one of the phonetic languages. For the brief introduction in English, please, refer to: https://functional-art.org/2020/papers/Poetry-OleksandrZhabenko.pdf. Since the version 0.3.0.0 the package has the multiple variations mode for @lineVariantsG3@ executable that allows to use modifications in the text, e. g. synonyms, paraphrases etc. homepage: https://hackage.haskell.org/package/phonetic-languages-simplified-examples-array