Hello community, here is the log from the commit of package ghc-managed for openSUSE:Leap:15.2 checked in at 2020-03-10 17:14:47 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Leap:15.2/ghc-managed (Old) and /work/SRC/openSUSE:Leap:15.2/.ghc-managed.new.26092 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-managed" Tue Mar 10 17:14:47 2020 rev:12 rq:783374 version:1.0.7 Changes: -------- --- /work/SRC/openSUSE:Leap:15.2/ghc-managed/ghc-managed.changes 2020-02-19 18:39:56.198096427 +0100 +++ /work/SRC/openSUSE:Leap:15.2/.ghc-managed.new.26092/ghc-managed.changes 2020-03-10 17:14:48.641442477 +0100 @@ -1,0 +2,6 @@ +Sat Jan 25 10:23:00 UTC 2020 - [email protected] + +- Update managed to version 1.0.7. + Upstream does not provide a change log file. + +------------------------------------------------------------------- Old: ---- managed-1.0.6.tar.gz New: ---- managed-1.0.7.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-managed.spec ++++++ --- /var/tmp/diff_new_pack.BPo27m/_old 2020-03-10 17:14:48.945442573 +0100 +++ /var/tmp/diff_new_pack.BPo27m/_new 2020-03-10 17:14:48.945442573 +0100 @@ -1,7 +1,7 @@ # # spec file for package ghc-managed # -# Copyright (c) 2019 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2020 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 @@ -18,7 +18,7 @@ %global pkg_name managed Name: ghc-%{pkg_name} -Version: 1.0.6 +Version: 1.0.7 Release: 0 Summary: A monad for managed values License: BSD-3-Clause ++++++ managed-1.0.6.tar.gz -> managed-1.0.7.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/managed-1.0.6/managed.cabal new/managed-1.0.7/managed.cabal --- old/managed-1.0.6/managed.cabal 2018-02-14 04:00:52.000000000 +0100 +++ new/managed-1.0.7/managed.cabal 2020-01-22 04:14:31.000000000 +0100 @@ -1,5 +1,5 @@ Name: managed -Version: 1.0.6 +Version: 1.0.7 Cabal-Version: >=1.8.0.2 Build-Type: Simple License: BSD3 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/managed-1.0.6/src/Control/Monad/Managed.hs new/managed-1.0.7/src/Control/Monad/Managed.hs --- old/managed-1.0.6/src/Control/Monad/Managed.hs 2018-02-14 04:00:52.000000000 +0100 +++ new/managed-1.0.7/src/Control/Monad/Managed.hs 2020-01-22 04:14:31.000000000 +0100 @@ -108,6 +108,9 @@ ) where import Control.Monad.IO.Class (MonadIO(liftIO)) +#if MIN_VERSION_base(4,9,0) +import Control.Monad.Fail as MonadFail (MonadFail(..)) +#endif import Control.Monad.Trans.Class (lift) #if MIN_VERSION_base(4,8,0) @@ -166,6 +169,13 @@ a <- m return_ a ) +#if MIN_VERSION_base(4,9,0) +instance MonadFail Managed where + fail s = Managed (\return_ -> do + a <- MonadFail.fail s + return_ a ) +#endif + instance Semigroup a => Semigroup (Managed a) where (<>) = liftA2 (<>)
