Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-indexed-traversable-instances
for openSUSE:Factory checked in at 2021-11-11 21:36:35
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-indexed-traversable-instances (Old)
and
/work/SRC/openSUSE:Factory/.ghc-indexed-traversable-instances.new.1890 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-indexed-traversable-instances"
Thu Nov 11 21:36:35 2021 rev:2 rq:930336 version:0.1.1
Changes:
--------
---
/work/SRC/openSUSE:Factory/ghc-indexed-traversable-instances/ghc-indexed-traversable-instances.changes
2021-03-10 08:58:00.654935779 +0100
+++
/work/SRC/openSUSE:Factory/.ghc-indexed-traversable-instances.new.1890/ghc-indexed-traversable-instances.changes
2021-11-11 21:36:50.820907250 +0100
@@ -1,0 +2,7 @@
+Mon Nov 1 08:37:08 UTC 2021 - [email protected]
+
+- Update indexed-traversable-instances to version 0.1.1.
+ Upstream has not updated the file "Changelog.md" since the last
+ release.
+
+-------------------------------------------------------------------
Old:
----
indexed-traversable-instances-0.1.tar.gz
New:
----
indexed-traversable-instances-0.1.1.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-indexed-traversable-instances.spec ++++++
--- /var/tmp/diff_new_pack.IA6a3a/_old 2021-11-11 21:36:51.280907585 +0100
+++ /var/tmp/diff_new_pack.IA6a3a/_new 2021-11-11 21:36:51.284907588 +0100
@@ -19,13 +19,14 @@
%global pkg_name indexed-traversable-instances
%bcond_with tests
Name: ghc-%{pkg_name}
-Version: 0.1
+Version: 0.1.1
Release: 0
Summary: More instances of FunctorWithIndex, FoldableWithIndex,
TraversableWithIndex
License: BSD-2-Clause
URL: https://hackage.haskell.org/package/%{pkg_name}
Source0:
https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
BuildRequires: ghc-Cabal-devel
+BuildRequires: ghc-OneTuple-devel
BuildRequires: ghc-indexed-traversable-devel
BuildRequires: ghc-rpm-macros
BuildRequires: ghc-tagged-devel
++++++ indexed-traversable-instances-0.1.tar.gz ->
indexed-traversable-instances-0.1.1.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/indexed-traversable-instances-0.1/indexed-traversable-instances.cabal
new/indexed-traversable-instances-0.1.1/indexed-traversable-instances.cabal
--- old/indexed-traversable-instances-0.1/indexed-traversable-instances.cabal
2001-09-09 03:46:40.000000000 +0200
+++ new/indexed-traversable-instances-0.1.1/indexed-traversable-instances.cabal
2001-09-09 03:46:40.000000000 +0200
@@ -1,6 +1,6 @@
cabal-version: 1.12
name: indexed-traversable-instances
-version: 0.1
+version: 0.1.1
build-type: Simple
license: BSD2
license-file: LICENSE
@@ -30,7 +30,9 @@
|| ==8.4.4
|| ==8.6.5
|| ==8.8.4
- || ==8.10.2
+ || ==8.10.7
+ || ==9.0.1
+ || ==9.2.1
source-repository head
type: git
@@ -42,14 +44,26 @@
ghc-options: -Wall
hs-source-dirs: src
build-depends:
- base >=4.5 && <4.16
+ base >=4.5 && <4.17
, indexed-traversable >=0.1 && <0.2
+ , OneTuple >=0.3 && <0.4
, tagged >=0.8.6 && <0.9
, unordered-containers >=0.2.8.0 && <0.3
, vector >=0.12.1.2 && <0.13
exposed-modules: Data.Functor.WithIndex.Instances
+test-suite safe
+ type: exitcode-stdio-1.0
+ default-language: Haskell2010
+ ghc-options: -Wall
+ hs-source-dirs: tests
+ main-is: safe.hs
+ build-depends:
+ base
+ , indexed-traversable
+ , indexed-traversable-instances
+
test-suite indexed-tests
type: exitcode-stdio-1.0
default-language: Haskell2010
@@ -61,13 +75,14 @@
, containers
, indexed-traversable
, indexed-traversable-instances
+ , OneTuple
, transformers
, unordered-containers
, vector
build-depends:
QuickCheck >=2.14.2 && <2.15
- , quickcheck-instances >=0.3.25.1 && <0.4
+ , quickcheck-instances >=0.3.26 && <0.4
, tasty >=1.2.3 && <1.5
, tasty-quickcheck >=0.10.1.1 && <0.11
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/indexed-traversable-instances-0.1/src/Data/Functor/WithIndex/Instances.hs
new/indexed-traversable-instances-0.1.1/src/Data/Functor/WithIndex/Instances.hs
---
old/indexed-traversable-instances-0.1/src/Data/Functor/WithIndex/Instances.hs
2001-09-09 03:46:40.000000000 +0200
+++
new/indexed-traversable-instances-0.1.1/src/Data/Functor/WithIndex/Instances.hs
2001-09-09 03:46:40.000000000 +0200
@@ -21,6 +21,7 @@
import Control.Applicative ((<$>))
import Data.HashMap.Lazy (HashMap)
import Data.Tagged (Tagged (..))
+import Data.Tuple.Solo (Solo (Solo))
import Data.Vector (Vector)
import qualified Data.HashMap.Lazy as HM
@@ -82,3 +83,19 @@
instance TraversableWithIndex k (HashMap k) where
itraverse = HM.traverseWithKey
{-# INLINE itraverse #-}
+
+-------------------------------------------------------------------------------
+-- OneTuple
+-------------------------------------------------------------------------------
+
+instance FunctorWithIndex () Solo where
+ imap f (Solo a) = Solo (f () a)
+ {-# INLINE imap #-}
+
+instance FoldableWithIndex () Solo where
+ ifoldMap f (Solo a) = f () a
+ {-# INLINE ifoldMap #-}
+
+instance TraversableWithIndex () Solo where
+ itraverse f (Solo a) = Solo <$> f () a
+ {-# INLINE itraverse #-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/indexed-traversable-instances-0.1/tests/main.hs
new/indexed-traversable-instances-0.1.1/tests/main.hs
--- old/indexed-traversable-instances-0.1/tests/main.hs 2001-09-09
03:46:40.000000000 +0200
+++ new/indexed-traversable-instances-0.1.1/tests/main.hs 2001-09-09
03:46:40.000000000 +0200
@@ -7,6 +7,7 @@
import Data.Foldable (toList)
import Data.Functor.Identity (Identity (..))
import Data.Monoid (Endo (..), Monoid (..))
+import Data.Tuple.Solo (Solo (Solo))
import Test.QuickCheck
(Arbitrary, CoArbitrary, Fun, Function, Property, applyFun, (===))
import Test.QuickCheck.Poly (A, B)
@@ -52,6 +53,7 @@
, battery $ mkT (HM.keys :: forall a. HM.HashMap I a -> [I])
, battery $ mkT (zipWith const [0 ..] . toList :: forall a. Seq.Seq a ->
[Int])
, battery $ mkT $ zipWith const [0 ..] . V.toList
+ , battery $ mkT $ \(Solo _) -> [()]
#if MIN_VERSION_containers(0,6,3)
, battery $ mkT IntMap.keys
#endif
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/indexed-traversable-instances-0.1/tests/safe.hs
new/indexed-traversable-instances-0.1.1/tests/safe.hs
--- old/indexed-traversable-instances-0.1/tests/safe.hs 1970-01-01
01:00:00.000000000 +0100
+++ new/indexed-traversable-instances-0.1.1/tests/safe.hs 2001-09-09
03:46:40.000000000 +0200
@@ -0,0 +1,10 @@
+{-# LANGUAGE Safe #-}
+module Main (main) where
+
+import Data.Functor.WithIndex ()
+import Data.Functor.WithIndex.Instances ()
+import Data.Foldable.WithIndex ()
+import Data.Traversable.WithIndex ()
+
+main :: IO ()
+main = return ()
