Hello community, here is the log from the commit of package ghc-data-default-class for openSUSE:Factory checked in at 2016-10-19 13:03:45 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-data-default-class (Old) and /work/SRC/openSUSE:Factory/.ghc-data-default-class.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "ghc-data-default-class" Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-data-default-class/ghc-data-default-class.changes 2016-07-21 08:14:57.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-data-default-class.new/ghc-data-default-class.changes 2016-10-19 13:03:48.000000000 +0200 @@ -1,0 +2,5 @@ +Thu Sep 15 06:43:32 UTC 2016 - psimons@suse.com + +- Update to version 0.1.2.0 revision 0 with cabal2obs. + +------------------------------------------------------------------- Old: ---- data-default-class-0.0.1.tar.gz New: ---- data-default-class-0.1.2.0.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-data-default-class.spec ++++++ --- /var/tmp/diff_new_pack.XsNQ28/_old 2016-10-19 13:03:50.000000000 +0200 +++ /var/tmp/diff_new_pack.XsNQ28/_new 2016-10-19 13:03:50.000000000 +0200 @@ -18,11 +18,11 @@ %global pkg_name data-default-class Name: ghc-%{pkg_name} -Version: 0.0.1 +Version: 0.1.2.0 Release: 0 Summary: A class for types with a default value 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 @@ -47,15 +47,12 @@ %prep %setup -q -n %{pkg_name}-%{version} - %build %ghc_lib_build - %install %ghc_lib_install - %post devel %ghc_pkg_recache ++++++ data-default-class-0.0.1.tar.gz -> data-default-class-0.1.2.0.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/data-default-class-0.0.1/Data/Default/Class.hs new/data-default-class-0.1.2.0/Data/Default/Class.hs --- old/data-default-class-0.0.1/Data/Default/Class.hs 2013-04-02 21:58:04.000000000 +0200 +++ new/data-default-class-0.1.2.0/Data/Default/Class.hs 2016-06-26 00:55:15.000000000 +0200 @@ -29,12 +29,123 @@ -} +{-# LANGUAGE CPP #-} + +#define HAVE_GHC_GENERICS (__GLASGOW_HASKELL__ >= 704) + +#if HAVE_GHC_GENERICS +{-# LANGUAGE DefaultSignatures, TypeOperators, FlexibleContexts #-} +#endif + module Data.Default.Class ( -- | This module defines a class for types with a default value. +-- It also defines 'Default' instances for the types 'Int', 'Int8', +-- 'Int16', 'Int32', 'Int64', 'Word', 'Word8', 'Word16', 'Word32', 'Word64', +-- 'Integer', 'Float', 'Double', 'Ratio', 'Complex', 'CShort', 'CUShort', +-- 'CInt', 'CUInt', 'CLong', 'CULong', 'CLLong', 'CULLong', 'CPtrdiff', +-- 'CSize', 'CSigAtomic', 'CIntPtr', 'CUIntPtr', 'CIntMax', 'CUIntMax', +-- 'CClock', 'CTime', 'CUSeconds', 'CSUSeconds', 'CFloat', 'CDouble', '(->)', +-- 'IO', 'Maybe', '()', '[]', 'Ordering', 'Any', 'All', 'Last', 'First', 'Sum', +-- 'Product', 'Endo', 'Dual', and tuples. Default(..) ) where +import Data.Int +import Data.Word +import Data.Monoid +import Data.Ratio +import Data.Complex +import Foreign.C.Types + +#if HAVE_GHC_GENERICS +import GHC.Generics + +class GDefault f where + gdef :: f a + +instance GDefault U1 where + gdef = U1 + +instance (Default a) => GDefault (K1 i a) where + gdef = K1 def + +instance (GDefault a, GDefault b) => GDefault (a :*: b) where + gdef = gdef :*: gdef + +instance (GDefault a) => GDefault (M1 i c a) where + gdef = M1 gdef +#endif + -- | A class for types with a default value. class Default a where -- | The default value for this type. def :: a + +#if HAVE_GHC_GENERICS + default def :: (Generic a, GDefault (Rep a)) => a + def = to gdef +#endif + +instance Default Int where def = 0 +instance Default Int8 where def = 0 +instance Default Int16 where def = 0 +instance Default Int32 where def = 0 +instance Default Int64 where def = 0 +instance Default Word where def = 0 +instance Default Word8 where def = 0 +instance Default Word16 where def = 0 +instance Default Word32 where def = 0 +instance Default Word64 where def = 0 +instance Default Integer where def = 0 +instance Default Float where def = 0 +instance Default Double where def = 0 +instance (Integral a) => Default (Ratio a) where def = 0 +instance (Default a, RealFloat a) => Default (Complex a) where def = def :+ def + +instance Default CShort where def = 0 +instance Default CUShort where def = 0 +instance Default CInt where def = 0 +instance Default CUInt where def = 0 +instance Default CLong where def = 0 +instance Default CULong where def = 0 +instance Default CLLong where def = 0 +instance Default CULLong where def = 0 +instance Default CPtrdiff where def = 0 +instance Default CSize where def = 0 +instance Default CSigAtomic where def = 0 +instance Default CIntPtr where def = 0 +instance Default CUIntPtr where def = 0 +instance Default CIntMax where def = 0 +instance Default CUIntMax where def = 0 +instance Default CClock where def = 0 +instance Default CTime where def = 0 +#if MIN_VERSION_base(4, 4, 0) +instance Default CUSeconds where def = 0 +instance Default CSUSeconds where def = 0 +#endif +instance Default CFloat where def = 0 +instance Default CDouble where def = 0 + +instance (Default r) => Default (e -> r) where def = const def +instance (Default a) => Default (IO a) where def = return def + +instance Default (Maybe a) where def = Nothing + +instance Default () where def = mempty +instance Default [a] where def = mempty +instance Default Ordering where def = mempty +instance Default Any where def = mempty +instance Default All where def = mempty +instance Default (Last a) where def = mempty +instance Default (First a) where def = mempty +instance (Num a) => Default (Sum a) where def = mempty +instance (Num a) => Default (Product a) where def = mempty +instance Default (Endo a) where def = mempty + +instance (Default a) => Default (Dual a) where def = Dual def +instance (Default a, Default b) => Default (a, b) where def = (def, def) +instance (Default a, Default b, Default c) => Default (a, b, c) where def = (def, def, def) +instance (Default a, Default b, Default c, Default d) => Default (a, b, c, d) where def = (def, def, def, def) +instance (Default a, Default b, Default c, Default d, Default e) => Default (a, b, c, d, e) where def = (def, def, def, def, def) +instance (Default a, Default b, Default c, Default d, Default e, Default f) => Default (a, b, c, d, e, f) where def = (def, def, def, def, def, def) +instance (Default a, Default b, Default c, Default d, Default e, Default f, Default g) => Default (a, b, c, d, e, f, g) where def = (def, def, def, def, def, def, def) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/data-default-class-0.0.1/LICENSE new/data-default-class-0.1.2.0/LICENSE --- old/data-default-class-0.0.1/LICENSE 2013-04-02 21:58:04.000000000 +0200 +++ new/data-default-class-0.1.2.0/LICENSE 2016-06-26 00:55:15.000000000 +0200 @@ -14,13 +14,13 @@ may be used to endorse or promote products derived from this software without specific prior written permission. -THIS SOFTWARE IS PROVIDED BY LUKAS MAI AND CONTRIBUTORS "AS IS" AND ANY -EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND +ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE -DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY -DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES -(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; -LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON -ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT -(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS -SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE +FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL +DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR +SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER +CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, +OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE +OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/data-default-class-0.0.1/data-default-class.cabal new/data-default-class-0.1.2.0/data-default-class.cabal --- old/data-default-class-0.0.1/data-default-class.cabal 2013-04-02 21:58:04.000000000 +0200 +++ new/data-default-class-0.1.2.0/data-default-class.cabal 2016-06-26 00:55:15.000000000 +0200 @@ -1,5 +1,5 @@ Name: data-default-class -Version: 0.0.1 +Version: 0.1.2.0 Cabal-Version: >= 1.6 Category: Data Synopsis: A class for types with a default value @@ -15,4 +15,7 @@ Library Build-Depends: base >=2 && <5 + if impl(ghc == 7.4.*) + -- for GHC.Generics + Build-Depends: ghc-prim Exposed-Modules: Data.Default.Class
participants (1)
-
root@hilbert.suse.de