Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package ghc-regex-tdfa for openSUSE:Factory 
checked in at 2026-11-06 19:49:46
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-regex-tdfa (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-regex-tdfa.new.3759290 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-regex-tdfa"

Fri Nov  6 19:49:46 2026 rev:33 rq:1395555 version:1.3.2.7

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-regex-tdfa/ghc-regex-tdfa.changes    
2025-10-07 18:28:42.298306927 +0200
+++ 
/work/SRC/openSUSE:Factory/.ghc-regex-tdfa.new.3759290/ghc-regex-tdfa.changes   
    2026-11-06 19:56:42.938014042 +0100
@@ -1,0 +2,22 @@
+Tue Oct 20 17:11:33 UTC 2026 - Peter Simons <[email protected]>
+
+- Update regex-tdfa to version 1.3.2.7.
+  ### 1.3.2.7
+
+  _2026-10-20 Andreas Abel_
+
+  - Replace `memcpy` foreign imports with `copyMutableByteArray#` (David 
Himmelstrup [#78](https://github.com/haskell-hvr/regex-tdfa/issues/78))
+  - Tested with GHC 8.0 - 10.0.1 alpha1
+
+-------------------------------------------------------------------
+Thu Aug 13 16:21:47 UTC 2026 - Peter Simons <[email protected]>
+
+- Update regex-tdfa to version 1.3.2.6.
+  ### 1.3.2.6
+
+  _2026-08-13 Andreas Abel_
+
+  - Address deprecation warning for (Data.IntSet.fold) 
([#76](https://github.com/haskell-hvr/regex-tdfa/issues/76))
+  - Tested with GHC 8.0 - 9.14.1
+
+-------------------------------------------------------------------

Old:
----
  regex-tdfa-1.3.2.5.tar.gz

New:
----
  regex-tdfa-1.3.2.7.tar.gz

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

Other differences:
------------------
++++++ ghc-regex-tdfa.spec ++++++
--- /var/tmp/diff_new_pack.NBp3Rm/_old  2026-11-06 19:56:43.954056574 +0100
+++ /var/tmp/diff_new_pack.NBp3Rm/_new  2026-11-06 19:56:43.956056658 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-regex-tdfa
 #
-# Copyright (c) 2025 SUSE LLC
+# Copyright (c) 2026 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -20,7 +20,7 @@
 %global pkgver %{pkg_name}-%{version}
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        1.3.2.5
+Version:        1.3.2.7
 Release:        0
 Summary:        Pure Haskell Tagged DFA Backend for "Text.Regex" (regex-base)
 License:        BSD-3-Clause

++++++ regex-tdfa-1.3.2.5.tar.gz -> regex-tdfa-1.3.2.7.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/regex-tdfa-1.3.2.5/CHANGELOG.md 
new/regex-tdfa-1.3.2.7/CHANGELOG.md
--- old/regex-tdfa-1.3.2.5/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200
+++ new/regex-tdfa-1.3.2.7/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200
@@ -1,3 +1,17 @@
+### 1.3.2.7
+
+_2026-10-20 Andreas Abel_
+
+- Replace `memcpy` foreign imports with `copyMutableByteArray#` (David 
Himmelstrup [#78](https://github.com/haskell-hvr/regex-tdfa/issues/78))
+- Tested with GHC 8.0 - 10.0.1 alpha1
+
+### 1.3.2.6
+
+_2026-08-13 Andreas Abel_
+
+- Address deprecation warning for (Data.IntSet.fold) 
([#76](https://github.com/haskell-hvr/regex-tdfa/issues/76))
+- Tested with GHC 8.0 - 9.14.1
+
 ### 1.3.2.5
 
 _2025-09-29 Andreas Abel_
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/regex-tdfa-1.3.2.5/lib/Data/IntSet/EnumSet2.hs 
new/regex-tdfa-1.3.2.7/lib/Data/IntSet/EnumSet2.hs
--- old/regex-tdfa-1.3.2.5/lib/Data/IntSet/EnumSet2.hs  2001-09-09 
03:46:40.000000000 +0200
+++ new/regex-tdfa-1.3.2.7/lib/Data/IntSet/EnumSet2.hs  2001-09-09 
03:46:40.000000000 +0200
@@ -81,7 +81,7 @@
   where f' b = fromEnum (f (toEnum b))
 
 fold :: (Enum e) => (e -> b -> b) -> b -> EnumSet e -> b
-fold f a (EnumSet s) = S.fold f' a s
+fold f a (EnumSet s) = S.foldr f' a s
   where f' b a1 = f (toEnum b) a1
 
 elems :: (Enum e) => EnumSet e -> [e]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/regex-tdfa-1.3.2.5/lib/Text/Regex/TDFA/NewDFA/Engine.hs 
new/regex-tdfa-1.3.2.7/lib/Text/Regex/TDFA/NewDFA/Engine.hs
--- old/regex-tdfa-1.3.2.5/lib/Text/Regex/TDFA/NewDFA/Engine.hs 2001-09-09 
03:46:40.000000000 +0200
+++ new/regex-tdfa-1.3.2.7/lib/Text/Regex/TDFA/NewDFA/Engine.hs 2001-09-09 
03:46:40.000000000 +0200
@@ -16,8 +16,7 @@
 -- #ifdef __GLASGOW_HASKELL__
 import GHC.Arr(STArray(..))
 import GHC.ST(ST(..))
-import 
GHC.Exts(MutableByteArray#,RealWorld,Int#,getSizeofMutableByteArray#,State#)
-import Unsafe.Coerce (unsafeCoerce)
+import GHC.Exts(getSizeofMutableByteArray#,copyMutableByteArray#)
 {-
 -- #else
 import Control.Monad.ST(ST)
@@ -47,7 +46,6 @@
 import qualified Data.ByteString.Lazy.Char8 as LBS(ByteString)
 import qualified Data.Text as T
 import qualified Data.Text.Lazy as TL
-import Foreign.Ptr(Ptr)
 
 import Text.Regex.Base(MatchArray,MatchOffset,MatchLength)
 import qualified Text.Regex.TDFA.IntArrTrieSet as Trie(lookupAsc)
@@ -708,14 +706,7 @@
   set (m_orbit s2) i2 $! newOrbit
   newerPos !! 0
 
-{- USING memcpy TO COPY STUARRAY DATA -}
-
--- #ifdef __GLASGOW_HASKELL__
-foreign import ccall unsafe "memcpy"
-    memcpyIO :: MutableByteArray# RealWorld -> MutableByteArray# RealWorld -> 
Int# -> IO (Ptr a)
-
-memcpyST :: MutableByteArray# s -> MutableByteArray# s -> Int# -> State# s -> 
(# State# s, Ptr a #)
-memcpyST = unsafeCoerce memcpyIO
+-- Copy STUArray storage through the byte-array primitive.
 
 {-
 Prelude Data.Array.Base> :i STUArray
@@ -732,7 +723,7 @@
 --  when (b1/=b2) (error ("\n\nWTF copySTU: "++show (b1,b2)))
   ST $ \s1# ->
     case getSizeofMutableByteArray# msource s1# of { (# s1'#, n# #) ->
-    case memcpyST mdest msource n# s1'# of { (# s2#, _ #) ->
+    case copyMutableByteArray# msource 0# mdest 0# n# s1'# of { s2# ->
     (# s2#, () #) }}
 {-
 -- #else /* !__GLASGOW_HASKELL__ */
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/regex-tdfa-1.3.2.5/lib/Text/Regex/TDFA/NewDFA/Engine_FA.hs 
new/regex-tdfa-1.3.2.7/lib/Text/Regex/TDFA/NewDFA/Engine_FA.hs
--- old/regex-tdfa-1.3.2.5/lib/Text/Regex/TDFA/NewDFA/Engine_FA.hs      
2001-09-09 03:46:40.000000000 +0200
+++ new/regex-tdfa-1.3.2.7/lib/Text/Regex/TDFA/NewDFA/Engine_FA.hs      
2001-09-09 03:46:40.000000000 +0200
@@ -17,7 +17,7 @@
 
 import GHC.Arr(STArray(..))
 import GHC.ST(ST(..))
-import 
GHC.Exts(MutableByteArray#,RealWorld,Int#,getSizeofMutableByteArray#,unsafeCoerce#,State#)
+import GHC.Exts(getSizeofMutableByteArray#,copyMutableByteArray#)
 
 import Prelude hiding ((!!))
 import Control.Monad(when,unless,forM,forM_,liftM2,foldM)
@@ -39,7 +39,6 @@
 import qualified Data.Sequence as Seq(null)
 import qualified Data.ByteString.Char8 as SBS(ByteString)
 import qualified Data.ByteString.Lazy.Char8 as LBS(ByteString)
-import Foreign.Ptr(Ptr)
 
 import Text.Regex.Base(MatchArray,MatchOffset,MatchLength)
 import Text.Regex.TDFA.Common hiding (indent)
@@ -599,14 +598,7 @@
   doActions preTag newerPos (newPos instructions)
   set (m_orbit s2) i2 $! newOrbit
 
-{- USING memcpy TO COPY STUARRAY DATA -}
-
--- #ifdef __GLASGOW_HASKELL__
-foreign import ccall unsafe "memcpy"
-    memcpyIO :: MutableByteArray# RealWorld -> MutableByteArray# RealWorld -> 
Int# -> IO (Ptr a)
-
-memcpyST :: MutableByteArray# s -> MutableByteArray# s -> Int# -> State# s -> 
(# State# s, Ptr a #)
-memcpyST = unsafeCoerce# memcpyIO
+-- Copy STUArray storage through the byte-array primitive.
 
 {-
 Prelude Data.Array.Base> :i STUArray
@@ -623,7 +615,7 @@
 --  when (b1/=b2) (error ("\n\nWTF copySTU: "++show (b1,b2)))
   ST $ \s1# ->
     case getSizeofMutableByteArray# msource s1# of { (# s1'#, n# #) ->
-    case memcpyST mdest msource n# s1'# of { (# s2#, _ #) ->
+    case copyMutableByteArray# msource 0# mdest 0# n# s1'# of { s2# ->
     (# s2#, () #) }}
 {-
 -- #else /* !__GLASGOW_HASKELL__ */
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/regex-tdfa-1.3.2.5/regex-tdfa.cabal 
new/regex-tdfa-1.3.2.7/regex-tdfa.cabal
--- old/regex-tdfa-1.3.2.5/regex-tdfa.cabal     2001-09-09 03:46:40.000000000 
+0200
+++ new/regex-tdfa-1.3.2.7/regex-tdfa.cabal     2001-09-09 03:46:40.000000000 
+0200
@@ -1,6 +1,6 @@
 cabal-version:          2.0
 name:                   regex-tdfa
-version:                1.3.2.5
+version:                1.3.2.7
 
 build-Type:             Simple
 license:                BSD3
@@ -27,7 +27,9 @@
   test/cases/*.txt
 
 tested-with:
-  GHC == 9.12.2
+  GHC == 10.0.1
+  GHC == 9.14.1
+  GHC == 9.12.4
   GHC == 9.10.3
   GHC == 9.8.4
   GHC == 9.6.7
@@ -38,8 +40,6 @@
   GHC == 8.8.4
   GHC == 8.6.5
   GHC == 8.4.4
-  GHC == 8.2.2
-  GHC == 8.0.2
 
 source-repository head
   type:                git
@@ -48,7 +48,7 @@
 source-repository this
   type:                git
   location:            https://github.com/haskell-hvr/regex-tdfa.git
-  tag:                 v1.3.2.5
+  tag:                 v1.3.2.7
 
 flag force-O2
   default: False

Reply via email to