Hello community,
here is the log from the commit of package ghc-contravariant-extras for
openSUSE:Factory checked in at 2017-01-31 12:41:14
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-contravariant-extras (Old)
and /work/SRC/openSUSE:Factory/.ghc-contravariant-extras.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-contravariant-extras"
Changes:
--------
---
/work/SRC/openSUSE:Factory/ghc-contravariant-extras/ghc-contravariant-extras.changes
2017-01-19 10:42:16.234450294 +0100
+++
/work/SRC/openSUSE:Factory/.ghc-contravariant-extras.new/ghc-contravariant-extras.changes
2017-02-03 17:38:51.818828537 +0100
@@ -1,0 +2,5 @@
+Sun Aug 21 17:13:52 UTC 2016 - [email protected]
+
+- Update to version 0.3.3.1 revision 0 with cabal2obs.
+
+-------------------------------------------------------------------
Old:
----
contravariant-extras-0.3.2.tar.gz
New:
----
contravariant-extras-0.3.3.1.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-contravariant-extras.spec ++++++
--- /var/tmp/diff_new_pack.ySR27N/_old 2017-02-03 17:38:52.202774194 +0100
+++ /var/tmp/diff_new_pack.ySR27N/_new 2017-02-03 17:38:52.202774194 +0100
@@ -18,22 +18,20 @@
%global pkg_name contravariant-extras
Name: ghc-%{pkg_name}
-Version: 0.3.2
+Version: 0.3.3.1
Release: 0
Summary: Extras for the "contravariant" package
License: MIT
-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
-# Begin cabal-rpm deps:
BuildRequires: ghc-base-prelude-devel
BuildRequires: ghc-contravariant-devel
BuildRequires: ghc-rpm-macros
BuildRequires: ghc-template-haskell-devel
BuildRequires: ghc-tuple-th-devel
BuildRoot: %{_tmppath}/%{name}-%{version}-build
-# End cabal-rpm deps
%description
Extras for the "contravariant" package.
@@ -53,15 +51,12 @@
%prep
%setup -q -n %{pkg_name}-%{version}
-
%build
%ghc_lib_build
-
%install
%ghc_lib_install
-
%post devel
%ghc_pkg_recache
++++++ contravariant-extras-0.3.2.tar.gz -> contravariant-extras-0.3.3.1.tar.gz
++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/contravariant-extras-0.3.2/contravariant-extras.cabal
new/contravariant-extras-0.3.3.1/contravariant-extras.cabal
--- old/contravariant-extras-0.3.2/contravariant-extras.cabal 2016-04-25
16:13:34.000000000 +0200
+++ new/contravariant-extras-0.3.3.1/contravariant-extras.cabal 2016-08-17
18:24:55.000000000 +0200
@@ -1,7 +1,7 @@
name:
contravariant-extras
version:
- 0.3.2
+ 0.3.3.1
category:
Control
synopsis:
@@ -38,7 +38,7 @@
library
ghc-options:
default-extensions:
- Arrows, BangPatterns, ConstraintKinds, DataKinds, DefaultSignatures,
DeriveDataTypeable, DeriveFunctor, DeriveGeneric, EmptyDataDecls,
FlexibleContexts, FlexibleInstances, FunctionalDependencies, GADTs,
GeneralizedNewtypeDeriving, ImpredicativeTypes, LambdaCase,
LiberalTypeSynonyms, MagicHash, MultiParamTypeClasses, MultiWayIf,
NoImplicitPrelude, NoMonomorphismRestriction, OverloadedStrings, PatternGuards,
ParallelListComp, QuasiQuotes, RankNTypes, RecordWildCards,
ScopedTypeVariables, StandaloneDeriving, TemplateHaskell, TupleSections,
TypeFamilies, TypeOperators, UnboxedTuples
+ Arrows, BangPatterns, ConstraintKinds, DataKinds, DefaultSignatures,
DeriveDataTypeable, DeriveFoldable, DeriveFunctor, DeriveGeneric,
DeriveTraversable, EmptyDataDecls, FlexibleContexts, FlexibleInstances,
FunctionalDependencies, GADTs, GeneralizedNewtypeDeriving, LambdaCase,
LiberalTypeSynonyms, MagicHash, MultiParamTypeClasses, MultiWayIf,
NoImplicitPrelude, NoMonomorphismRestriction, OverloadedStrings, PatternGuards,
ParallelListComp, QuasiQuotes, RankNTypes, RecordWildCards,
ScopedTypeVariables, StandaloneDeriving, TemplateHaskell, TupleSections,
TypeFamilies, TypeOperators, UnboxedTuples
default-language:
Haskell2010
other-modules:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/contravariant-extras-0.3.2/library/Contravariant/Extras.hs
new/contravariant-extras-0.3.3.1/library/Contravariant/Extras.hs
--- old/contravariant-extras-0.3.2/library/Contravariant/Extras.hs
2016-04-25 16:13:34.000000000 +0200
+++ new/contravariant-extras-0.3.3.1/library/Contravariant/Extras.hs
2016-08-17 18:24:55.000000000 +0200
@@ -4,6 +4,7 @@
-- A berserk collection of @contrazip@ functions with arities of up to 42.
module Contravariant.Extras.Contrazip,
contramany,
+ Supplied(..),
)
where
@@ -30,3 +31,20 @@
nil =
conquer
+-- |
+-- A combination of a divisible functor with some input for it.
+-- Allows to use the 'Monoid' API for composition.
+data Supplied divisible =
+ forall input. Supplied !(divisible input) !input
+
+instance Divisible divisible => Monoid (Supplied divisible) where
+ mempty =
+ Supplied conquer ()
+ mappend (Supplied divisible1 input1) (Supplied divisible2 input2) =
+ Supplied divisible3 input3
+ where
+ divisible3 =
+ divide id divisible1 divisible2
+ input3 =
+ (input1, input2)
+
