commit ghc-utility-ht for openSUSE:Factory
Hello community,
here is the log from the commit of package ghc-utility-ht for openSUSE:Factory
checked in at 2020-08-28 21:40:36
Comparing /work/SRC/openSUSE:Factory/ghc-utility-ht (Old)
and /work/SRC/openSUSE:Factory/.ghc-utility-ht.new.3399 (New)
Package is "ghc-utility-ht"
Fri Aug 28 21:40:36 2020 rev:2 rq:829477 version:0.0.15
Changes:
--- /work/SRC/openSUSE:Factory/ghc-utility-ht/ghc-utility-ht.changes
2020-06-19 17:05:16.160804988 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-utility-ht.new.3399/ghc-utility-ht.changes
2020-08-28 21:40:36.716870331 +0200
@@ -1,0 +2,5 @@
+Tue Aug 18 10:46:30 UTC 2020 - Peter Simons
+
+- Replace %setup -q with the more modern %autosetup macro.
+
+---
Other differences:
--
++ ghc-utility-ht.spec ++
--- /var/tmp/diff_new_pack.Hyja4o/_old 2020-08-28 21:40:37.188870505 +0200
+++ /var/tmp/diff_new_pack.Hyja4o/_new 2020-08-28 21:40:37.188870505 +0200
@@ -57,7 +57,7 @@
This package provides the Haskell %{pkg_name} library development files.
%prep
-%setup -q -n %{pkg_name}-%{version}
+%autosetup -n %{pkg_name}-%{version}
%build
%ghc_lib_build
commit ghc-utility-ht for openSUSE:Factory
Hello community,
here is the log from the commit of package ghc-utility-ht for openSUSE:Factory
checked in at 2017-09-15 22:22:34
Comparing /work/SRC/openSUSE:Factory/ghc-utility-ht (Old)
and /work/SRC/openSUSE:Factory/.ghc-utility-ht.new (New)
Package is "ghc-utility-ht"
Fri Sep 15 22:22:34 2017 rev:5 rq:525623 version:0.0.14
Changes:
--- /work/SRC/openSUSE:Factory/ghc-utility-ht/ghc-utility-ht.changes
2017-06-22 10:39:33.540677641 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-utility-ht.new/ghc-utility-ht.changes
2017-09-15 22:22:35.485170890 +0200
@@ -1,0 +2,5 @@
+Thu Aug 3 15:38:38 UTC 2017 - psim...@suse.com
+
+- Updated with latest spec-cleaner version 0.9.8-8-geadfbbf.
+
+---
Other differences:
--
++ ghc-utility-ht.spec ++
--- /var/tmp/diff_new_pack.ETONll/_old 2017-09-15 22:22:36.117081861 +0200
+++ /var/tmp/diff_new_pack.ETONll/_new 2017-09-15 22:22:36.121081298 +0200
@@ -23,12 +23,11 @@
Release:0
Summary:Various small helper functions for Lists, Maybes, Tuples,
Functions
License:BSD-3-Clause
-Group: Development/Languages/Other
-Url:https://hackage.haskell.org/package/%{pkg_name}
+Group: Development/Libraries/Haskell
+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-rpm-macros
-BuildRoot: %{_tmppath}/%{name}-%{version}-build
%if %{with tests}
BuildRequires: ghc-QuickCheck-devel
%endif
@@ -50,7 +49,7 @@
%package devel
Summary:Haskell %{pkg_name} library development files
-Group: Development/Libraries/Other
+Group: Development/Libraries/Haskell
Requires: %{name} = %{version}-%{release}
Requires: ghc-compiler = %{ghc_version}
Requires(post): ghc-compiler = %{ghc_version}
@@ -78,10 +77,8 @@
%ghc_pkg_recache
%files -f %{name}.files
-%defattr(-,root,root,-)
%doc LICENSE
%files devel -f %{name}-devel.files
-%defattr(-,root,root,-)
%changelog
commit ghc-utility-ht for openSUSE:Factory
Hello community,
here is the log from the commit of package ghc-utility-ht for openSUSE:Factory
checked in at 2017-06-22 10:39:29
Comparing /work/SRC/openSUSE:Factory/ghc-utility-ht (Old)
and /work/SRC/openSUSE:Factory/.ghc-utility-ht.new (New)
Package is "ghc-utility-ht"
Thu Jun 22 10:39:29 2017 rev:4 rq:504117 version:0.0.14
Changes:
--- /work/SRC/openSUSE:Factory/ghc-utility-ht/ghc-utility-ht.changes
2017-04-14 13:39:07.699458083 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-utility-ht.new/ghc-utility-ht.changes
2017-06-22 10:39:33.540677641 +0200
@@ -1,0 +2,5 @@
+Thu Jun 8 11:08:13 UTC 2017 - psim...@suse.com
+
+- Update to version 0.0.14.
+
+---
Old:
utility-ht-0.0.13.tar.gz
New:
utility-ht-0.0.14.tar.gz
Other differences:
--
++ ghc-utility-ht.spec ++
--- /var/tmp/diff_new_pack.JRWkF2/_old 2017-06-22 10:39:34.692515248 +0200
+++ /var/tmp/diff_new_pack.JRWkF2/_new 2017-06-22 10:39:34.696514684 +0200
@@ -19,7 +19,7 @@
%global pkg_name utility-ht
%bcond_with tests
Name: ghc-%{pkg_name}
-Version:0.0.13
+Version:0.0.14
Release:0
Summary:Various small helper functions for Lists, Maybes, Tuples,
Functions
License:BSD-3-Clause
++ utility-ht-0.0.13.tar.gz -> utility-ht-0.0.14.tar.gz ++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.13/src/Control/Applicative/HT.hs
new/utility-ht-0.0.14/src/Control/Applicative/HT.hs
--- old/utility-ht-0.0.13/src/Control/Applicative/HT.hs 2017-03-25
09:21:36.0 +0100
+++ new/utility-ht-0.0.14/src/Control/Applicative/HT.hs 2017-06-03
10:13:46.0 +0200
@@ -12,18 +12,56 @@
mapTriple fgh = Tuple.uncurry3 (liftA3 (,,)) . Tuple.mapTriple fgh
+{-# INLINE lift #-}
+lift :: Applicative m => (a -> r) -> m a -> m r
+lift = fmap
+
+{-# INLINE lift2 #-}
+lift2 ::
+ Applicative m => (a -> b -> r) -> m a -> m b -> m r
+lift2 = liftA2
+
+{-# INLINE lift3 #-}
+lift3 ::
+ Applicative m => (a -> b -> c -> r) -> m a -> m b -> m c -> m r
+lift3 = liftA3
+
+{-# INLINE lift4 #-}
+lift4 ::
+ Applicative m =>
+ (a -> b -> c -> d -> r) -> m a -> m b -> m c -> m d -> m r
+lift4 fn a b c d = fn <$> a <*> b <*> c <*> d
+
+{-# INLINE lift5 #-}
+lift5 ::
+ Applicative m =>
+ (a -> b -> c -> d -> e -> r) ->
+ m a -> m b -> m c -> m d -> m e -> m r
+lift5 fn a b c d e = fn <$> a <*> b <*> c <*> d <*> e
+
+{-# INLINE lift6 #-}
+lift6 ::
+ Applicative m =>
+ (a -> b -> c -> d -> e -> f -> r) ->
+ m a -> m b -> m c -> m d -> m e -> m f -> m r
+lift6 fn a b c d e f = fn <$> a <*> b <*> c <*> d <*> e <*> f
+
+
+{-# DEPRECATED liftA4 "use App.lift4" #-}
{-# INLINE liftA4 #-}
liftA4 :: Applicative f =>
(a -> b -> c -> d -> e) ->
f a -> f b -> f c -> f d -> f e
liftA4 f a b c d = f <$> a <*> b <*> c <*> d
+{-# DEPRECATED liftA5 "use App.lift5" #-}
{-# INLINE liftA5 #-}
liftA5 :: Applicative f =>
(a -> b -> c -> d -> e -> g) ->
f a -> f b -> f c -> f d -> f e -> f g
liftA5 f a b c d e = f <$> a <*> b <*> c <*> d <*> e
+{-# DEPRECATED liftA6 "use App.lift6" #-}
{-# INLINE liftA6 #-}
liftA6 :: Applicative f =>
(a -> b -> c -> d -> e -> g -> h) ->
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.13/src/Data/List/HT/Private.hs
new/utility-ht-0.0.14/src/Data/List/HT/Private.hs
--- old/utility-ht-0.0.13/src/Data/List/HT/Private.hs 2017-03-25
09:21:36.0 +0100
+++ new/utility-ht-0.0.14/src/Data/List/HT/Private.hs 2017-06-03
10:13:46.0 +0200
@@ -566,6 +566,17 @@
Example: Keep the heads of sublists until an empty list occurs.
> takeWhileJust $ map (fmap fst . viewL) xs
+
+
+For consistency with 'takeWhile',
+'partitionMaybe' and 'dropWhileNothing' it should have been:
+
+> takeWhileJust_ :: (a -> Maybe b) -> a -> [b]
+
+However, both variants are interchangeable:
+
+> takeWhileJust_ f == takeWhileJust . map f
+> takeWhileJust == takeWhileJust_ id
-}
takeWhileJust :: [Maybe a] -> [a]
takeWhileJust =
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.13/src/Data/List/HT.hs
new/utility-ht-0.0.14/src/Data/List/HT.hs
--- old/utility-ht-0.0.13/src/Data/List/HT.hs 2017-03-25 09:21:36.0
+0100
+++ new/utility-ht-0.0.14/src/Data/List/HT.hs 2017-06-03 10:13:46.0
+0200
@@ -35,6 +35,7 @@
L.maybeSuffixOf,
L.partitionMaybe,
L.takeWhileJust,
+ L.dropWhileNothing,
L.unzipEithers,
-- * Sieve and slice
L.sieve,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
commit ghc-utility-ht for openSUSE:Factory
Hello community,
here is the log from the commit of package ghc-utility-ht for openSUSE:Factory
checked in at 2017-04-14 13:39:07
Comparing /work/SRC/openSUSE:Factory/ghc-utility-ht (Old)
and /work/SRC/openSUSE:Factory/.ghc-utility-ht.new (New)
Package is "ghc-utility-ht"
Fri Apr 14 13:39:07 2017 rev:3 rq:485172 version:0.0.13
Changes:
--- /work/SRC/openSUSE:Factory/ghc-utility-ht/ghc-utility-ht.changes
2017-02-03 17:40:27.641265797 +0100
+++ /work/SRC/openSUSE:Factory/.ghc-utility-ht.new/ghc-utility-ht.changes
2017-04-14 13:39:07.699458083 +0200
@@ -1,0 +2,5 @@
+Mon Mar 27 12:41:42 UTC 2017 - psim...@suse.com
+
+- Update to version 0.0.13 with cabal2obs.
+
+---
Old:
utility-ht-0.0.12.tar.gz
New:
utility-ht-0.0.13.tar.gz
Other differences:
--
++ ghc-utility-ht.spec ++
--- /var/tmp/diff_new_pack.bDrx1c/_old 2017-04-14 13:39:08.459350687 +0200
+++ /var/tmp/diff_new_pack.bDrx1c/_new 2017-04-14 13:39:08.463350121 +0200
@@ -1,7 +1,7 @@
#
# spec file for package ghc-utility-ht
#
-# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -19,7 +19,7 @@
%global pkg_name utility-ht
%bcond_with tests
Name: ghc-%{pkg_name}
-Version:0.0.12
+Version:0.0.13
Release:0
Summary:Various small helper functions for Lists, Maybes, Tuples,
Functions
License:BSD-3-Clause
++ utility-ht-0.0.12.tar.gz -> utility-ht-0.0.13.tar.gz ++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.12/src/Control/Monad/HT.hs
new/utility-ht-0.0.13/src/Control/Monad/HT.hs
--- old/utility-ht-0.0.12/src/Control/Monad/HT.hs 2016-09-01
19:19:05.0 +0200
+++ new/utility-ht-0.0.13/src/Control/Monad/HT.hs 2017-03-25
09:21:36.0 +0100
@@ -1,6 +1,7 @@
module Control.Monad.HT where
import qualified Control.Monad as M
+import qualified Data.List as List
import Prelude hiding (repeat, until, )
@@ -20,6 +21,9 @@
repeat x =
let go = lift2 (:) x go in go
+nest :: (Monad m) => Int -> (a -> m a) -> a -> m a
+nest n f x0 = M.foldM (\x () -> f x) x0 (List.replicate n ())
+
{-# DEPRECATED untilM "use M.until" #-}
{- | repeat action until result fulfills condition -}
until, untilM :: (Monad m) => (a -> Bool) -> m a -> m a
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.12/src/Data/Either/HT.hs
new/utility-ht-0.0.13/src/Data/Either/HT.hs
--- old/utility-ht-0.0.12/src/Data/Either/HT.hs 1970-01-01 01:00:00.0
+0100
+++ new/utility-ht-0.0.13/src/Data/Either/HT.hs 2017-03-25 09:21:36.0
+0100
@@ -0,0 +1,15 @@
+module Data.Either.HT (
+ mapLeft,
+ mapRight,
+ mapBoth,
+ ) where
+
+
+mapLeft :: (a -> b) -> Either a c -> Either b c
+mapLeft f = either (Left . f) Right
+
+mapRight :: (b -> c) -> Either a b -> Either a c
+mapRight f = either Left (Right . f)
+
+mapBoth :: (a -> c) -> (b -> d) -> Either a b -> Either c d
+mapBoth f g = either (Left . f) (Right . g)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.12/src/Data/Function/HT.hs
new/utility-ht-0.0.13/src/Data/Function/HT.hs
--- old/utility-ht-0.0.12/src/Data/Function/HT.hs 2016-09-01
19:19:05.0 +0200
+++ new/utility-ht-0.0.13/src/Data/Function/HT.hs 2017-03-25
09:21:36.0 +0100
@@ -1,9 +1,17 @@
module Data.Function.HT (
- nest, powerAssociative, compose2,
+ Id, nest, powerAssociative, compose2,
) where
import Data.Function.HT.Private (nest, powerAssociative, )
+
+{- |
+Useful for adding type annotations like in
+
+> f . (id :: Id Char) . g
+-}
+type Id a = a -> a
+
{- |
Known as @on@ in newer versions of the @base@ package.
-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.12/src/Data/List/HT/Private.hs
new/utility-ht-0.0.13/src/Data/List/HT/Private.hs
--- old/utility-ht-0.0.12/src/Data/List/HT/Private.hs 2016-09-01
19:19:05.0 +0200
+++ new/utility-ht-0.0.13/src/Data/List/HT/Private.hs 2017-03-25
09:21:36.0 +0100
@@ -2,12 +2,15 @@
import Data.List as List (find, transpose, unfoldr, isPrefixOf,
findIndices, foldl', mapAccumL, )
-import Data.Maybe as Maybe (fromMaybe, catMaybes, )
+import Data.Maybe as Maybe (fromMaybe, catMaybes, isJust, mapMaybe, )
import Data.Maybe.HT
commit ghc-utility-ht for openSUSE:Factory
Hello community,
here is the log from the commit of package ghc-utility-ht for openSUSE:Factory
checked in at 2017-01-31 12:40:20
Comparing /work/SRC/openSUSE:Factory/ghc-utility-ht (Old)
and /work/SRC/openSUSE:Factory/.ghc-utility-ht.new (New)
Package is "ghc-utility-ht"
Changes:
--- /work/SRC/openSUSE:Factory/ghc-utility-ht/ghc-utility-ht.changes
2017-01-18 21:38:21.561838033 +0100
+++ /work/SRC/openSUSE:Factory/.ghc-utility-ht.new/ghc-utility-ht.changes
2017-02-03 17:40:27.641265797 +0100
@@ -1,0 +2,5 @@
+Thu Sep 15 06:35:12 UTC 2016 - psim...@suse.com
+
+- Update to version 0.0.12 revision 0 with cabal2obs.
+
+---
Old:
utility-ht-0.0.11.tar.gz
New:
utility-ht-0.0.12.tar.gz
Other differences:
--
++ ghc-utility-ht.spec ++
--- /var/tmp/diff_new_pack.56rb2D/_old 2017-02-03 17:40:27.965219944 +0100
+++ /var/tmp/diff_new_pack.56rb2D/_new 2017-02-03 17:40:27.965219944 +0100
@@ -19,21 +19,19 @@
%global pkg_name utility-ht
%bcond_with tests
Name: ghc-%{pkg_name}
-Version:0.0.11
+Version:0.0.12
Release:0
Summary:Various small helper functions for Lists, Maybes, Tuples,
Functions
License:BSD-3-Clause
-Group: System/Libraries
+Group: Development/Languages/Other
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-rpm-macros
BuildRoot: %{_tmppath}/%{name}-%{version}-build
-# Begin cabal-rpm deps:
%if %{with tests}
BuildRequires: ghc-QuickCheck-devel
%endif
-# End cabal-rpm deps
%description
Various small helper functions for Lists, Maybes, Tuples, Functions.
@@ -64,20 +62,14 @@
%prep
%setup -q -n %{pkg_name}-%{version}
-
%build
%ghc_lib_build
-
%install
%ghc_lib_install
-
%check
-%if %{with tests}
-%{cabal} test
-%endif
-
+%cabal_test
%post devel
%ghc_pkg_recache
++ utility-ht-0.0.11.tar.gz -> utility-ht-0.0.12.tar.gz ++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.11/src/Control/Applicative/HT.hs
new/utility-ht-0.0.12/src/Control/Applicative/HT.hs
--- old/utility-ht-0.0.11/src/Control/Applicative/HT.hs 1970-01-01
01:00:00.0 +0100
+++ new/utility-ht-0.0.12/src/Control/Applicative/HT.hs 2016-09-01
19:19:05.0 +0200
@@ -0,0 +1,31 @@
+module Control.Applicative.HT where
+
+import qualified Data.Tuple.HT as Tuple
+
+import Control.Applicative (Applicative, liftA2, liftA3, (<$>), (<*>), )
+
+mapPair :: (Applicative f) => (a -> f c, b -> f d) -> (a,b) -> f (c,d)
+mapPair fg = uncurry (liftA2 (,)) . Tuple.mapPair fg
+
+mapTriple ::
+ (Applicative m) => (a -> m d, b -> m e, c -> m f) -> (a,b,c) -> m (d,e,f)
+mapTriple fgh = Tuple.uncurry3 (liftA3 (,,)) . Tuple.mapTriple fgh
+
+
+{-# INLINE liftA4 #-}
+liftA4 :: Applicative f =>
+ (a -> b -> c -> d -> e) ->
+ f a -> f b -> f c -> f d -> f e
+liftA4 f a b c d = f <$> a <*> b <*> c <*> d
+
+{-# INLINE liftA5 #-}
+liftA5 :: Applicative f =>
+ (a -> b -> c -> d -> e -> g) ->
+ f a -> f b -> f c -> f d -> f e -> f g
+liftA5 f a b c d e = f <$> a <*> b <*> c <*> d <*> e
+
+{-# INLINE liftA6 #-}
+liftA6 :: Applicative f =>
+ (a -> b -> c -> d -> e -> g -> h) ->
+ f a -> f b -> f c -> f d -> f e -> f g -> f h
+liftA6 f a b c d e g = f <$> a <*> b <*> c <*> d <*> e <*> g
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/utility-ht-0.0.11/src/Control/Functor/HT.hs
new/utility-ht-0.0.12/src/Control/Functor/HT.hs
--- old/utility-ht-0.0.11/src/Control/Functor/HT.hs 2015-08-19
15:11:14.0 +0200
+++ new/utility-ht-0.0.12/src/Control/Functor/HT.hs 2016-09-01
19:19:05.0 +0200
@@ -28,6 +28,24 @@
unzip3 :: Functor f => f (a, b, c) -> (f a, f b, f c)
unzip3 x = (fmap fst3 x, fmap snd3 x, fmap thd3 x)
+
+mapFst :: Functor f => (a -> f c) -> (a, b) -> f (c, b)
+mapFst f ~(a,b) = fmap (flip (,) b) $ f a
+
+mapSnd :: Functor f => (b -> f c) -> (a, b) -> f (a, c)
+mapSnd f ~(a,b) = fmap ((,) a) $ f b
+
+
+mapFst3 :: Functor f => (a -> f d) -> (a,b,c) -> f (d,b,c)
+mapFst3 f ~(a,b,c) = fmap (\x -> (x,b,c)) $ f a
+
+mapSnd3 :: Functor f => (b -> f d) -> (a,b,c) -> f (a,d,c)
+mapSnd3 f ~(a,b,c) = fmap (\x -> (a,x,c)) $ f b
+
+mapThd3 :: Functor f => (c -> f d) -> (a,b,c) -> f (a,b,d)
+mapThd3 f ~(a,b,c) = fmap ((,,) a b) $ f c
+
+
{- |
Generalization of 'Data.List.HT.outerProduct'.
-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
