packages feed

phonetic-languages-basis 0.1.0.0 → 0.1.1.0

raw patch · 4 files changed

+22/−3 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

+ Phonetic.Languages.Basis: R2 :: !a -> !b -> !c -> Result2 a b c
+ Phonetic.Languages.Basis: [line2] :: Result2 a b c -> !a
+ Phonetic.Languages.Basis: [propertiesF2] :: Result2 a b c -> !b
+ Phonetic.Languages.Basis: [transPropertiesF2] :: Result2 a b c -> !c
+ Phonetic.Languages.Basis: data Result2 a b c
+ Phonetic.Languages.Basis: instance (GHC.Classes.Eq a, GHC.Classes.Eq b, GHC.Classes.Eq c) => GHC.Classes.Eq (Phonetic.Languages.Basis.Result2 a b c)
+ Phonetic.Languages.Basis: instance (GHC.Classes.Ord a, GHC.Classes.Ord b, GHC.Classes.Ord c) => GHC.Classes.Ord (Phonetic.Languages.Basis.Result2 a b c)

Files

CHANGELOG.md view
@@ -4,3 +4,9 @@  * First version. Released on an unsuspecting world. Is taken from the phonetic-languages-simplified-base package to change the import and dependencies trees. +## 0.1.1.0 -- 2022-08-09++* First version revised A. Made some code changes so that it now is coherent with the ukrainian-phonetics-basic-array-0.6.0.0 version.+Changed the structure of the non-sound Ukraninian symbols representation (now they are converted to one of the [100,101,102]).+Added Result2 data type to the module Phonetic.Languages.Basis.+
Phonetic/Languages/Basis.hs view
@@ -30,3 +30,16 @@ getAC :: FuncRep2 a b c -> (a -> c) getAC (D f g) = g . f {-# INLINE getAC #-}++data Result2 a b c = R2 {line2 :: !a, propertiesF2 :: !b,  transPropertiesF2 :: !c} deriving Eq++instance (Ord a, Ord b, Ord c) => Ord (Result2 a b c) where+  compare x y+    = case compare (transPropertiesF2 x) (transPropertiesF2 y) of+       !EQ -> case compare (propertiesF2 x) (propertiesF2 y) of+              !EQ -> compare (line2 x) (line2 y)+              !z -> z+       !z0 -> z0+  {-# INLINE compare #-}++
Phonetic/Languages/UniquenessPeriodsG.hs view
@@ -60,12 +60,12 @@  -- | A variant of the 'diverse2GGL' function for 'Int8'. diverse2GLInt8 :: Foldable t => [Int8] -> t Int8 -> Int16-diverse2GLInt8 = diverse2GGL (-1::Int8)+diverse2GLInt8 = diverse2GGL (101::Int8) {-# INLINE diverse2GLInt8 #-}  -- | A variant for the 'uniquenessPeriodsGG' function for 'Int8'. uniquenessPeriodsGI8 :: Foldable t => [Int8] -> t Int8 -> [Int16]-uniquenessPeriodsGI8 = uniquenessPeriodsGG (-1::Int8)+uniquenessPeriodsGI8 = uniquenessPeriodsGG (101::Int8) {-# INLINE uniquenessPeriodsGI8 #-}  -- | The first and the third list arguments of numbers (if not empty) must be sorted in the ascending order.
phonetic-languages-basis.cabal view
@@ -1,5 +1,5 @@ name:                phonetic-languages-basis-version:             0.1.0.0+version:             0.1.1.0 synopsis:            A basics of the phonetic-languages functionality. description:         The  common for different realizations functionality. Just the necessary one. homepage:            https://hackage.haskell.org/package/phonetic-languages-basis