Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-resourcet for openSUSE:Factory checked in at 2021-08-25 20:57:05 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-resourcet (Old) and /work/SRC/openSUSE:Factory/.ghc-resourcet.new.1899 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-resourcet" Wed Aug 25 20:57:05 2021 rev:27 rq:912622 version:1.2.4.3 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-resourcet/ghc-resourcet.changes 2020-12-22 11:45:30.957816975 +0100 +++ /work/SRC/openSUSE:Factory/.ghc-resourcet.new.1899/ghc-resourcet.changes 2021-08-25 20:58:07.161168191 +0200 @@ -1,0 +2,8 @@ +Thu Aug 5 15:04:55 UTC 2021 - [email protected] + +- Update resourcet to version 1.2.4.3. + ## 1.2.4.3 + + * Fix a space leak when using `forever` with `ResourceT`. [#470](https://github.com/snoyberg/conduit/pull/470) + +------------------------------------------------------------------- Old: ---- resourcet-1.2.4.2.tar.gz New: ---- resourcet-1.2.4.3.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-resourcet.spec ++++++ --- /var/tmp/diff_new_pack.oXcaGp/_old 2021-08-25 20:58:07.777167383 +0200 +++ /var/tmp/diff_new_pack.oXcaGp/_new 2021-08-25 20:58:07.777167383 +0200 @@ -1,7 +1,7 @@ # # spec file for package ghc-resourcet # -# Copyright (c) 2020 SUSE LLC +# Copyright (c) 2021 SUSE LLC # # 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 resourcet %bcond_with tests Name: ghc-%{pkg_name} -Version: 1.2.4.2 +Version: 1.2.4.3 Release: 0 Summary: Deterministic allocation and freeing of scarce resources License: BSD-3-Clause ++++++ resourcet-1.2.4.2.tar.gz -> resourcet-1.2.4.3.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/resourcet-1.2.4.2/ChangeLog.md new/resourcet-1.2.4.3/ChangeLog.md --- old/resourcet-1.2.4.2/ChangeLog.md 2020-06-25 15:46:35.000000000 +0200 +++ new/resourcet-1.2.4.3/ChangeLog.md 2021-08-05 04:20:47.000000000 +0200 @@ -1,5 +1,10 @@ # ChangeLog for resourcet + +## 1.2.4.3 + +* Fix a space leak when using `forever` with `ResourceT`. [#470](https://github.com/snoyberg/conduit/pull/470) + ## 1.2.4.2 * Mask exceptions in `Acquire` allocation action diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/resourcet-1.2.4.2/Control/Monad/Trans/Resource/Internal.hs new/resourcet-1.2.4.3/Control/Monad/Trans/Resource/Internal.hs --- old/resourcet-1.2.4.2/Control/Monad/Trans/Resource/Internal.hs 2020-06-25 15:46:35.000000000 +0200 +++ new/resourcet-1.2.4.3/Control/Monad/Trans/Resource/Internal.hs 2021-08-05 04:20:47.000000000 +0200 @@ -220,6 +220,10 @@ pure = ResourceT . const . pure ResourceT mf <*> ResourceT ma = ResourceT $ \r -> mf r <*> ma r + ResourceT mf *> ResourceT ma = ResourceT $ \r -> + mf r *> ma r + ResourceT mf <* ResourceT ma = ResourceT $ \r -> + mf r <* ma r -- | Since 1.1.5 instance Alternative m => Alternative (ResourceT m) where diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/resourcet-1.2.4.2/Data/Acquire/Internal.hs new/resourcet-1.2.4.3/Data/Acquire/Internal.hs --- old/resourcet-1.2.4.2/Data/Acquire/Internal.hs 2020-06-25 15:46:35.000000000 +0200 +++ new/resourcet-1.2.4.3/Data/Acquire/Internal.hs 2021-08-05 04:20:47.000000000 +0200 @@ -66,18 +66,34 @@ -- | Create an @Acquire@ value using the given allocate and free functions. -- +-- To acquire and free the resource in an arbitrary monad with `MonadUnliftIO`, +-- do the following: +-- +-- > acquire <- withRunInIO $ \runInIO -> +-- > return $ mkAcquire (runInIO create) (runInIO . free) +-- +-- Note that this is only safe if the Acquire is run and freed within the same +-- monadic scope it was created in. +-- -- @since 1.1.0 mkAcquire :: IO a -- ^ acquire the resource -> (a -> IO ()) -- ^ free the resource -> Acquire a -mkAcquire create free = Acquire $ \_ -> do - x <- create - return $! Allocated x (const $ free x) +mkAcquire create free = mkAcquireType create (\a _ -> free a) -- | Same as 'mkAcquire', but the cleanup function will be informed of /how/ -- cleanup was initiated. This allows you to distinguish, for example, between -- normal and exceptional exits. -- +-- To acquire and free the resource in an arbitrary monad with `MonadUnliftIO`, +-- do the following: +-- +-- > acquire <- withRunInIO $ \runInIO -> +-- > return $ mkAcquireType (runInIO create) (\a -> runInIO . free a) +-- +-- Note that this is only safe if the Acquire is run and freed within the same +-- monadic scope it was created in. +-- -- @since 1.1.2 mkAcquireType :: IO a -- ^ acquire the resource diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/resourcet-1.2.4.2/resourcet.cabal new/resourcet-1.2.4.3/resourcet.cabal --- old/resourcet-1.2.4.2/resourcet.cabal 2020-06-25 15:46:35.000000000 +0200 +++ new/resourcet-1.2.4.3/resourcet.cabal 2021-08-05 04:20:47.000000000 +0200 @@ -1,5 +1,5 @@ Name: resourcet -Version: 1.2.4.2 +Version: 1.2.4.3 Synopsis: Deterministic allocation and freeing of scarce resources. description: Hackage documentation generation is not reliable. For up to date documentation, please see: <http://www.stackage.org/package/resourcet>. License: BSD3
