Hello community,

here is the log from the commit of package ghc-mono-traversable for 
openSUSE:Factory checked in at 2017-04-14 13:38:35
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-mono-traversable (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-mono-traversable.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-mono-traversable"

Fri Apr 14 13:38:35 2017 rev:11 rq:485147 version:1.0.2

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/ghc-mono-traversable/ghc-mono-traversable.changes    
    2017-03-20 17:07:36.398442731 +0100
+++ 
/work/SRC/openSUSE:Factory/.ghc-mono-traversable.new/ghc-mono-traversable.changes
   2017-04-14 13:38:36.855817229 +0200
@@ -1,0 +2,5 @@
+Tue Mar  7 11:19:16 UTC 2017 - [email protected]
+
+- Update to version 1.0.2 with cabal2obs.
+
+-------------------------------------------------------------------

Old:
----
  mono-traversable-1.0.1.3.tar.gz

New:
----
  mono-traversable-1.0.2.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-mono-traversable.spec ++++++
--- /var/tmp/diff_new_pack.MhLmBe/_old  2017-04-14 13:38:37.663703051 +0200
+++ /var/tmp/diff_new_pack.MhLmBe/_new  2017-04-14 13:38:37.663703051 +0200
@@ -19,7 +19,7 @@
 %global pkg_name mono-traversable
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        1.0.1.3
+Version:        1.0.2
 Release:        0
 Summary:        Type classes for mapping, folding, and traversing monomorphic 
containers
 License:        MIT

++++++ mono-traversable-1.0.1.3.tar.gz -> mono-traversable-1.0.2.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/mono-traversable-1.0.1.3/ChangeLog.md 
new/mono-traversable-1.0.2/ChangeLog.md
--- old/mono-traversable-1.0.1.3/ChangeLog.md   2017-02-21 09:04:38.000000000 
+0100
+++ new/mono-traversable-1.0.2/ChangeLog.md     2017-03-02 10:11:36.000000000 
+0100
@@ -1,3 +1,7 @@
+## 1.0.2
+
+* `IsSequence` class: add `lengthIndex` 
[#127](https://github.com/snoyberg/mono-traversable/pull/127)
+
 ## 1.0.1.3
 
 * Make 'olength' for Set and Map O(1) 
[#125](https://github.com/snoyberg/mono-traversable/pull/125)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/mono-traversable-1.0.1.3/mono-traversable.cabal 
new/mono-traversable-1.0.2/mono-traversable.cabal
--- old/mono-traversable-1.0.1.3/mono-traversable.cabal 2017-02-21 
09:04:45.000000000 +0100
+++ new/mono-traversable-1.0.2/mono-traversable.cabal   2017-03-02 
10:11:13.000000000 +0100
@@ -1,5 +1,5 @@
 name:                mono-traversable
-version:             1.0.1.3
+version:             1.0.2
 synopsis:            Type classes for mapping, folding, and traversing 
monomorphic containers
 description:         Monomorphic variants of the Functor, Foldable, and 
Traversable typeclasses. If you understand Haskell's basic typeclasses, you 
understand mono-traversable. In addition to what you are used to, it adds on an 
IsSequence typeclass and has code for marking data structures as non-empty.
 homepage:            https://github.com/snoyberg/mono-traversable
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/mono-traversable-1.0.1.3/src/Data/Sequences.hs 
new/mono-traversable-1.0.2/src/Data/Sequences.hs
--- old/mono-traversable-1.0.1.3/src/Data/Sequences.hs  2016-09-15 
14:28:46.000000000 +0200
+++ new/mono-traversable-1.0.2/src/Data/Sequences.hs    2017-03-02 
10:12:08.000000000 +0100
@@ -145,6 +145,12 @@
     -- However, all the instances define their own fromList
     fromList = mconcat . fmap singleton
 
+    -- | 'lengthIndex' returns the length of a sequence as @'Index' seq@.
+    --
+    -- @since 1.0.2
+    lengthIndex :: seq -> Index seq;
+    lengthIndex = fromIntegral . olength64;
+
     -- below functions change type fron the perspective of NonEmpty
 
     -- | 'break' applies a predicate to a sequence, and returns a tuple where
@@ -558,6 +564,7 @@
 
 instance IsSequence [a] where
     fromList = id
+    lengthIndex = List.length
     filter = List.filter
     filterM = Control.Monad.filterM
     break = List.break
@@ -637,6 +644,7 @@
 
 instance IsSequence S.ByteString where
     fromList = S.pack
+    lengthIndex = S.length
     replicate = S.replicate
     filter = S.filter
     break = S.break
@@ -706,6 +714,7 @@
 
 instance IsSequence T.Text where
     fromList = T.pack
+    lengthIndex = T.length
     replicate i c = T.replicate i (T.singleton c)
     filter = T.filter
     break = T.break
@@ -768,6 +777,7 @@
 
 instance IsSequence L.ByteString where
     fromList = L.pack
+    lengthIndex = L.length
     replicate = L.replicate
     filter = L.filter
     break = L.break
@@ -827,6 +837,7 @@
 
 instance IsSequence TL.Text where
     fromList = TL.pack
+    lengthIndex = TL.length
     replicate i c = TL.replicate i (TL.singleton c)
     filter = TL.filter
     break = TL.break
@@ -886,6 +897,7 @@
 
 instance IsSequence (Seq.Seq a) where
     fromList = Seq.fromList
+    lengthIndex = Seq.length
     replicate = Seq.replicate
     replicateM = Seq.replicateM
     filter = Seq.filter
@@ -953,6 +965,7 @@
 
 instance IsSequence (V.Vector a) where
     fromList = V.fromList
+    lengthIndex = V.length
     replicate = V.replicate
     replicateM = V.replicateM
     filter = V.filter
@@ -1027,6 +1040,7 @@
 
 instance U.Unbox a => IsSequence (U.Vector a) where
     fromList = U.fromList
+    lengthIndex = U.length
     replicate = U.replicate
     replicateM = U.replicateM
     filter = U.filter
@@ -1101,6 +1115,7 @@
 
 instance VS.Storable a => IsSequence (VS.Vector a) where
     fromList = VS.fromList
+    lengthIndex = VS.length
     replicate = VS.replicate
     replicateM = VS.replicateM
     filter = VS.filter


Reply via email to