regular-extras 0.1.1 → 0.1.2

raw patch · 3 files changed

+6/−2 lines, 3 files

Files

• ChangeLog +4/−0
• regular-extras.cabal +1/−1
• src/Generics/Regular/Functions/Fixpoints.hs +1/−1

@@ -1,1 +1,5 @@+version 0.1.2: fix bug on hfixpoints++version 0.1.1: fix dependency on regular+ version 0.1: initial release

@@ -1,5 +1,5 @@ name:                   regular-extras-version:                0.1.1+version:                0.1.2 synopsis:               Additional functions for regular: arbitrary,                         coarbitrary, and binary get/put. description:

@@ -51,7 +51,7 @@ instance (Fixpoints f, Fixpoints g) => Fixpoints (f :*: g) where     hFixpoints (_ :: (f :*: g) a) =        let Leaf m = hFixpoints (undefined :: f a)-          Leaf n = hFixpoints (undefined :: f b)+          Leaf n = hFixpoints (undefined :: g a)       in Leaf (m + n)  instance Fixpoints I where