uniqueness-periods-vector-general 0.4.1.0 → 0.4.2.0
raw patch · 3 files changed
+8/−9 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- ChangeLog.md +4/−0
- Languages/UniquenessPeriods/Vector/General/Debug.hs +3/−8
- uniqueness-periods-vector-general.cabal +1/−1
ChangeLog.md view
@@ -44,3 +44,7 @@ * Fourth version revised A. Changed the order of the elements in the list in the Languages.UniquenessPeriods.Vector.General.Debug.maximumElByVec function so that being afterwards applied naturally Languages.UniquenessPeriods.Vector.General.Debug.printUniquenessG1List prints elements starting from the maximum one. ++## 0.4.2.0 -- 2020-09-13++* Fourth version revised B. Fixed issue with toFile function in being not written output for the complex second argument.
Languages/UniquenessPeriods/Vector/General/Debug.hs view
@@ -32,6 +32,7 @@ ) where import Data.Print.Info+import Data.List (intersperse) import System.IO import qualified Data.Vector as V import Languages.UniquenessPeriods.Vector.Auxiliary@@ -57,18 +58,12 @@ | otherwise = V.maximumBy (\(_,vN0,_) (_,vN1,_) -> compare (V.unsafeIndex vN0 0) (V.unsafeIndex vN1 0)) . snd . get22 $ y {-# INLINE maximumElBy #-} --- | Inspired by appendS16LEFile function from Melodics.Ukrainian module from @mmsyn6ukr@ package.+-- | Prints every 'String' from the list on the new line to the file. Uses 'appendFile' function inside. toFile :: FilePath -- ^ The 'FilePath' to the file to be written in the 'AppendMode' (actually appended with) the information output. -> [String] -- ^ Each 'String' is appended on the new line to the file. -> IO ()-toFile file xss = withFile file AppendMode (\hdl -> do- hClose hdl- closedHdl <- hIsClosed hdl- if closedHdl - then openFile file AppendMode >>= \hdl -> mapM_ (hPutStrLn hdl) xss- else error "The handle is not closed!"- hClose hdl)+toFile file xss = (mapM_ (appendFile file) . intersperse newLineEnding $ xss) >> appendFile file newLineEnding -- | Is used to print output specified to the 'stdout' or to the 'FilePath' specified as the inner argument in the 'Info2' parameter. printUniquenessG1
uniqueness-periods-vector-general.cabal view
@@ -2,7 +2,7 @@ -- For further documentation, see http://haskell.org/cabal/users-guide/ name: uniqueness-periods-vector-general-version: 0.4.1.0+version: 0.4.2.0 synopsis: Generalization of the functionality of the dobutokO-poetry-general-languages package description: Generalization of the functionality of the dobutokO-poetry-general-languages package homepage: https://hackage.haskell.org/package/uniqueness-periods-vector-general