Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package ghc-time-manager for 
openSUSE:Factory checked in at 2025-12-05 16:55:56
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-time-manager (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-time-manager.new.1939 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-time-manager"

Fri Dec  5 16:55:56 2025 rev:11 rq:1321139 version:0.2.4

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-time-manager/ghc-time-manager.changes        
2025-05-22 16:57:54.132541868 +0200
+++ 
/work/SRC/openSUSE:Factory/.ghc-time-manager.new.1939/ghc-time-manager.changes  
    2025-12-05 16:56:34.608234837 +0100
@@ -1,0 +2,9 @@
+Wed Nov 19 23:15:24 UTC 2025 - Peter Simons <[email protected]>
+
+- Update time-manager to version 0.2.4.
+  ## 0.2.4
+
+  * Providing `isAllGone`.
+  * Providing emptyHandle.
+
+-------------------------------------------------------------------

Old:
----
  time-manager-0.2.3.tar.gz

New:
----
  time-manager-0.2.4.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-time-manager.spec ++++++
--- /var/tmp/diff_new_pack.0IiLpD/_old  2025-12-05 16:56:36.460312270 +0100
+++ /var/tmp/diff_new_pack.0IiLpD/_new  2025-12-05 16:56:36.480313106 +0100
@@ -19,7 +19,7 @@
 %global pkg_name time-manager
 %global pkgver %{pkg_name}-%{version}
 Name:           ghc-%{pkg_name}
-Version:        0.2.3
+Version:        0.2.4
 Release:        0
 Summary:        Scalable timer
 License:        MIT

++++++ time-manager-0.2.3.tar.gz -> time-manager-0.2.4.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/time-manager-0.2.3/ChangeLog.md 
new/time-manager-0.2.4/ChangeLog.md
--- old/time-manager-0.2.3/ChangeLog.md 2001-09-09 03:46:40.000000000 +0200
+++ new/time-manager-0.2.4/ChangeLog.md 2001-09-09 03:46:40.000000000 +0200
@@ -1,5 +1,10 @@
 # ChangeLog for time-manager
 
+## 0.2.4
+
+* Providing `isAllGone`.
+* Providing emptyHandle.
+
 ## 0.2.3
 
 * Exporting defaultManager.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/time-manager-0.2.3/System/ThreadManager.hs 
new/time-manager-0.2.4/System/ThreadManager.hs
--- old/time-manager-0.2.3/System/ThreadManager.hs      2001-09-09 
03:46:40.000000000 +0200
+++ new/time-manager-0.2.4/System/ThreadManager.hs      2001-09-09 
03:46:40.000000000 +0200
@@ -8,7 +8,7 @@
     ThreadManager,
     newThreadManager,
     stopAfter,
-    KilledByThreadManager(..),
+    KilledByThreadManager (..),
 
     -- * Fork
     forkManaged,
@@ -19,6 +19,7 @@
 
     -- * Synchronization
     waitUntilAllGone,
+    isAllGone,
 
     -- * Re-exports
     T.Manager,
@@ -188,6 +189,11 @@
     m <- readTVar var
     check (Map.size m == 0)
 
+isAllGone :: ThreadManager -> STM Bool
+isAllGone (ThreadManager _timmgr var) = do
+    m <- readTVar var
+    return (Map.size m == 0)
+
 ----------------------------------------------------------------
 
 myWeakThradId :: IO (Weak ThreadId, Key)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/time-manager-0.2.3/System/TimeManager.hs 
new/time-manager-0.2.4/System/TimeManager.hs
--- old/time-manager-0.2.3/System/TimeManager.hs        2001-09-09 
03:46:40.000000000 +0200
+++ new/time-manager-0.2.4/System/TimeManager.hs        2001-09-09 
03:46:40.000000000 +0200
@@ -8,6 +8,7 @@
     defaultManager,
     TimeoutAction,
     Handle,
+    emptyHandle,
 
     -- ** Manager
     initialize,
@@ -63,9 +64,11 @@
     , handleStateRef :: IORef State
     }
 
+{-# NOINLINE emptyAction #-}
 emptyAction :: IORef TimeoutAction
 emptyAction = unsafePerformIO $ I.newIORef (return ())
 
+{-# NOINLINE emptyState #-}
 emptyState :: IORef State
 emptyState = unsafePerformIO $ I.newIORef Inactive
 
@@ -84,7 +87,7 @@
 
 ----------------------------------------------------------------
 
--- | Creating timeout manager which works every N micro seconds
+-- | Creating timeout manager which works every N microseconds
 --   where N is the first argument.
 initialize :: Int -> IO Manager
 initialize timeout
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/time-manager-0.2.3/time-manager.cabal 
new/time-manager-0.2.4/time-manager.cabal
--- old/time-manager-0.2.3/time-manager.cabal   2001-09-09 03:46:40.000000000 
+0200
+++ new/time-manager-0.2.4/time-manager.cabal   2001-09-09 03:46:40.000000000 
+0200
@@ -1,5 +1,5 @@
 Name:                time-manager
-Version:             0.2.3
+Version:             0.2.4
 Synopsis:            Scalable timer
 License:             MIT
 License-file:        LICENSE

Reply via email to