alignment 0.1.0.0 → 0.1.0.1

raw patch · 3 files changed

+27/−12 lines, 3 filesdep −transformersPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

Dependencies removed: transformers

API changes (from Hackage documentation)

Files

• alignment.cabal +4/−5
• changelog.md +5/−0
• src/Data/Alignment.hs +18/−7

@@ -1,7 +1,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                   alignment-version:                0.1.0.0+version:                0.1.0.1 synopsis:               Zip-alignment description:   <<https://system-f.gitlab.io/logo/systemf-450x450.jpg>>@@ -16,13 +16,13 @@ build-type:             Simple extra-source-files:     changelog.md cabal-version:          >=1.10-homepage:               https://github.com/system-f/alignment-bug-reports:            https://github.com/system-f/alignment/issues+homepage:               https://gitlab.com/system-f/alignment+bug-reports:            https://gitlab.com/system-f/alignment/issues tested-with:             GHC == 7.10.3, GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.3, GHC == 8.6.1  source-repository       head   type:                 git-  location:             git@github.com:system-f/alignment.git+  location:             git@gitlab.com:system-f/alignment.git  library   exposed-modules:      Data.Alignment@@ -31,7 +31,6 @@                       , bifunctors >= 5 && < 6                       , lens >= 4.15 && < 6                       , semigroupoids >= 5.1 && < 5.4-                      , transformers >= 0.5.0 && < 5.5                       , assoc >= 1 && < 2    hs-source-dirs:       src

@@ -1,3 +1,8 @@+0.1.0.1++* Add `alignWith`.+* Remove extraneous dependency.+ 0.1.0.0  * This change log starts.

@@ -49,13 +49,6 @@ import Data.Foldable ( Foldable(foldMap) ) import Data.Functor ( Functor(fmap) ) import Data.Functor.Apply ( Apply((<.>), liftF2) )-import qualified Data.List.NonEmpty as NonEmpty(cons, toList)-import Data.Maybe ( Maybe(..) )-import Data.Monoid ( (<>), Monoid(mempty) )-import Data.Ord ( Ord(compare) )-import Data.Semigroup ( Semigroup )-import Data.Traversable ( Traversable(traverse) )-import GHC.Show ( Show(showsPrec) ) import Data.Functor.Classes     ( compare1,       eq1,@@ -64,6 +57,13 @@       Eq1(..),       Ord1(..),       Show1(..) )+import qualified Data.List.NonEmpty as NonEmpty(cons, toList)+import Data.Maybe ( Maybe(..) )+import Data.Monoid ( (<>), Monoid(mempty) )+import Data.Ord ( Ord(compare) )+import Data.Semigroup ( Semigroup )+import Data.Traversable ( Traversable(traverse) )+import GHC.Show ( Show(showsPrec) )  data This f a b =   This@@ -163,6 +163,17 @@     f a     -> f b     -> This f a b+  align =+    alignWith (\x -> x) (\x -> x)+  alignWith ::+    (a -> c)+    -> (b -> d)+    -> f a+    -> f b+    -> This f c d+  alignWith f g a b =+    bimap f g (align a b)+  {-# MINIMAL align | alignWith #-}  -- | --