Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-split for openSUSE:Factory checked in at 2024-01-19 23:01:46 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-split (Old) and /work/SRC/openSUSE:Factory/.ghc-split.new.16006 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-split" Fri Jan 19 23:01:46 2024 rev:31 rq:1139824 version:0.2.5 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-split/ghc-split.changes 2023-10-18 21:25:56.965221449 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-split.new.16006/ghc-split.changes 2024-01-19 23:01:48.133164187 +0100 @@ -1,0 +2,12 @@ +Thu Jan 11 16:34:00 UTC 2024 - Peter Simons <psim...@suse.com> + +- Update split to version 0.2.5. + * 0.2.5 (9 January 2024) + + - Test with GHC 9.8. + - New function `mapSplitter` witnessing the fact that `Splitter` is + a contravariant functor + ([#22](https://github.com/byorgey/split/pull/22), thanks to Ellis + Kesterton) + +------------------------------------------------------------------- Old: ---- split-0.2.4.tar.gz New: ---- split-0.2.5.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-split.spec ++++++ --- /var/tmp/diff_new_pack.yBVKiD/_old 2024-01-19 23:01:48.877191403 +0100 +++ /var/tmp/diff_new_pack.yBVKiD/_new 2024-01-19 23:01:48.877191403 +0100 @@ -1,7 +1,7 @@ # # spec file for package ghc-split # -# Copyright (c) 2023 SUSE LLC +# Copyright (c) 2024 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -20,7 +20,7 @@ %global pkgver %{pkg_name}-%{version} %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.2.4 +Version: 0.2.5 Release: 0 Summary: Combinator library for splitting lists License: BSD-3-Clause ++++++ split-0.2.4.tar.gz -> split-0.2.5.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/split-0.2.4/CHANGES new/split-0.2.5/CHANGES --- old/split-0.2.4/CHANGES 2001-09-09 03:46:40.000000000 +0200 +++ new/split-0.2.5/CHANGES 2001-09-09 03:46:40.000000000 +0200 @@ -1,3 +1,11 @@ +* 0.2.5 (9 January 2024) + + - Test with GHC 9.8. + - New function `mapSplitter` witnessing the fact that `Splitter` is + a contravariant functor + ([#22](https://github.com/byorgey/split/pull/22), thanks to Ellis + Kesterton) + * 0.2.4 (9 October 2023) - Test with GHC 9.6. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/split-0.2.4/split.cabal new/split-0.2.5/split.cabal --- old/split-0.2.4/split.cabal 2001-09-09 03:46:40.000000000 +0200 +++ new/split-0.2.5/split.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,5 +1,5 @@ Name: split -Version: 0.2.4 +Version: 0.2.5 Stability: stable Description: A collection of various methods for splitting @@ -35,7 +35,7 @@ Category: List Build-type: Simple Cabal-Version: >= 1.10 -Tested-with: GHC ==9.6.2 || ==9.4.5 || ==9.2.7 || ==9.0.2 || ==8.10.7 || ==8.8.4 || ==8.6.5 || ==8.4.4 || ==8.2.2 || ==8.0.2 || ==7.10.3 || ==7.8.4 || ==7.6.3 || ==7.4.2 || ==7.2.2 || ==7.0.4 +Tested-with: GHC ==9.8.1 || ==9.6.3 || ==9.4.8 || ==9.2.8 || ==9.0.2 || ==8.10.7 || ==8.8.4 || ==8.6.5 || ==8.4.4 || ==8.2.2 || ==8.0.2 || ==7.10.3 || ==7.8.4 || ==7.6.3 || ==7.4.2 || ==7.2.2 || ==7.0.4 Bug-reports: https://github.com/byorgey/split/issues diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/split-0.2.4/src/Data/List/Split/Internals.hs new/split-0.2.5/src/Data/List/Split/Internals.hs --- old/split-0.2.4/src/Data/List/Split/Internals.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/split-0.2.5/src/Data/List/Split/Internals.hs 2001-09-09 03:46:40.000000000 +0200 @@ -379,6 +379,20 @@ dropInnerBlanks :: Splitter a -> Splitter a dropInnerBlanks s = s {condensePolicy = DropBlankFields} +-- | Split over a different type of element by performing a preprocessing step. +-- +-- >>> split (mapSplitter snd $ oneOf "-_") $ zip [0..] "a-bc_d" +-- [[(0,'a')],[(1,'-')],[(2,'b'),(3,'c')],[(4,'_')],[(5,'d')]] +-- +-- >>> import Data.Char (toLower) +-- >>> split (mapSplitter toLower $ dropDelims $ whenElt (== 'x')) "abXcxd" +-- ["ab","c","d"] +mapSplitter :: (b -> a) -> Splitter a -> Splitter b +mapSplitter f (Splitter d dp cp ibp fbp) = Splitter (mapDelimiter f d) dp cp ibp fbp + where + mapDelimiter :: (b -> a) -> Delimiter a -> Delimiter b + mapDelimiter g (Delimiter xs) = Delimiter $ map (. g) xs + -- ** Derived combinators -- | Drop all blank chunks from the output, and condense consecutive diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/split-0.2.4/src/Data/List/Split.hs new/split-0.2.5/src/Data/List/Split.hs --- old/split-0.2.4/src/Data/List/Split.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/split-0.2.5/src/Data/List/Split.hs 2001-09-09 03:46:40.000000000 +0200 @@ -61,6 +61,7 @@ dropInitBlank, dropFinalBlank, dropInnerBlanks, + mapSplitter, -- ** Derived combinators -- $derived
