Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package ghc-topograph for openSUSE:Factory 
checked in at 2022-10-13 15:43:21
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-topograph (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-topograph.new.2275 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-topograph"

Thu Oct 13 15:43:21 2022 rev:7 rq:1008535 version:1.0.0.2

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-topograph/ghc-topograph.changes      
2022-08-01 21:31:11.869793980 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-topograph.new.2275/ghc-topograph.changes    
2022-10-13 15:43:39.286914739 +0200
@@ -1,0 +2,6 @@
+Sun Aug 21 16:22:57 UTC 2022 - Peter Simons <psim...@suse.com>
+
+- Update topograph to version 1.0.0.2.
+  Upstream does not provide a change log file.
+
+-------------------------------------------------------------------

Old:
----
  topograph-1.0.0.1.tar.gz
  topograph.cabal

New:
----
  topograph-1.0.0.2.tar.gz

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

Other differences:
------------------
++++++ ghc-topograph.spec ++++++
--- /var/tmp/diff_new_pack.Xw1Zwr/_old  2022-10-13 15:43:39.754915653 +0200
+++ /var/tmp/diff_new_pack.Xw1Zwr/_new  2022-10-13 15:43:39.762915668 +0200
@@ -18,13 +18,12 @@
 
 %global pkg_name topograph
 Name:           ghc-%{pkg_name}
-Version:        1.0.0.1
+Version:        1.0.0.2
 Release:        0
 Summary:        Directed acyclic graphs
 License:        BSD-3-Clause
 URL:            https://hackage.haskell.org/package/%{pkg_name}
 Source0:        
https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
-Source1:        
https://hackage.haskell.org/package/%{pkg_name}-%{version}/revision/4.cabal#/%{pkg_name}.cabal
 BuildRequires:  ghc-Cabal-devel
 BuildRequires:  ghc-base-compat-devel
 BuildRequires:  ghc-base-orphans-devel
@@ -54,7 +53,6 @@
 
 %prep
 %autosetup -n %{pkg_name}-%{version}
-cp -p %{SOURCE1} %{pkg_name}.cabal
 
 %build
 %ghc_lib_build

++++++ topograph-1.0.0.1.tar.gz -> topograph-1.0.0.2.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/topograph-1.0.0.1/src/Topograph.hs 
new/topograph-1.0.0.2/src/Topograph.hs
--- old/topograph-1.0.0.1/src/Topograph.hs      2001-09-09 03:46:40.000000000 
+0200
+++ new/topograph-1.0.0.2/src/Topograph.hs      2001-09-09 03:46:40.000000000 
+0200
@@ -67,32 +67,46 @@
 
 -- $setup
 --
--- Graph used in examples:
---
--- <<dag-original.png>>
---
--- >>> let example :: Map Char (Set Char); example = Map.map Set.fromList $ 
Map.fromList [('a', "bxde"), ('b', "d"), ('x', "de"), ('d', "e"), ('e', "")]
+-- Initial setup and imports:
 --
 -- >>> :set -XRecordWildCards
 -- >>> import Data.Monoid (All (..))
 -- >>> import Data.Foldable (traverse_)
--- >>> import Data.List (elemIndex)
+-- >>> import Data.List (elemIndex, sort)
 -- >>> import Data.Tree (Tree (..))
+-- >>> import Data.Map (Map)
+-- >>> import Data.Set (Set)
+-- >>> import qualified Data.Tree as T
+-- >>> import qualified Data.Map as Map
+-- >>> import qualified Data.Set as Set
+--
+-- Some compatibility imports
+--
+-- >>> import Control.Applicative
+-- >>> import Data.Foldable (traverse_, foldMap)
+--
+-- Graph used in examples:
+--
+-- <<dag-original.png>>
+--
+-- >>> let example :: Map Char (Set Char); example = Map.map Set.fromList $ 
Map.fromList [('a', "bxde"), ('b', "d"), ('x', "de"), ('d', "e"), ('e', "")]
 --
 -- == Few functions to be used in examples
 --
 -- To make examples slightly shorter:
 --
--- >>> let fmap2 = fmap . fmap
--- >>> let fmap3 = fmap . fmap2
--- >>> let traverse2_ = traverse_ . traverse_
--- >>> let traverse3_ = traverse_ . traverse2_
+-- >>> let fmap2 f = fmap (fmap f)
+-- >>> let fmap3 f = fmap (fmap2 f)
+-- >>> let traverse2_ f = traverse_ (traverse_ f)
+-- >>> let traverse3_ f = traverse_ (traverse2_ f)
 --
 -- To display trees:
 --
 -- >>> let dispTree :: Show a => Tree a -> IO (); dispTree = go 0 where go i 
(T.Node x xs) = putStrLn (replicate (i * 2) ' ' ++ show x) >> traverse_ (go 
(succ i)) xs
 --
-
+-- And fold them (this function is available in recent @containers@):
+--
+-- >>> let foldTree f = go where go (T.Node x ts) = f x (map go ts)
 --
 
 -------------------------------------------------------------------------------
@@ -127,7 +141,7 @@
     , gEdges        :: i -> [i]        -- ^ /O(1)/. Outgoing edges. Note: 
target indices are larger than source index.
     , gDiff         :: i -> i -> Int   -- ^ /O(1)/. Upper bound of the path 
length. Negative means there aren't path.
     , gVerticeCount :: Int             -- ^ /O(1)/. @'gVerticeCount' g = 
'length' ('gVertices' g)@
-    , gVertexIndex  :: i -> Int        -- ^ /O(1)/. @'Just' ('verticeIndex' g 
x) = 'elemIndex' x ('gVertices' g)@. Note, there are no efficient way to 
convert 'Int' into 'i', convertion back and forth is discouraged on purpose.
+    , gVertexIndex  :: i -> Int        -- ^ /O(1)/. @'Just' ('verticeIndex' g 
x) = 'elemIndex' x ('gVertices' g)@. Note, there are no efficient way to 
convert 'Int' into 'i', conversion back and forth is discouraged on purpose.
     }
 
 -- | Run action on topologically sorted representation of the graph.
@@ -277,7 +291,7 @@
 -- <<dag-tree.png>>
 --
 -- >>> let t = runG example $ \g@G{..} -> fmap3 gFromVertex $ allPathsTree g 
<$> gToVertex 'a' <*> gToVertex 'e'
--- >>> fmap3 (T.foldTree $ \a bs -> if null bs then [[a]] else concatMap (map 
(a:)) bs) t
+-- >>> fmap3 (foldTree $ \a bs -> if null bs then [[a]] else concatMap (map 
(a:)) bs) t
 -- Right (Just (Just ["axde","axe","abde","ade","ae"]))
 --
 -- >>> fmap3 (Set.fromList . treePairs) t
@@ -579,7 +593,7 @@
 treePairs (T.Node i js) =
     [ (i, j) | T.Node j _ <- js ] ++ concatMap treePairs js
 
--- | Consequtive pairs.
+-- | Consecutive pairs.
 --
 -- >>> pairs [1..10]
 -- [(1,2),(2,3),(3,4),(4,5),(5,6),(6,7),(7,8),(8,9),(9,10)]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/topograph-1.0.0.1/topograph.cabal 
new/topograph-1.0.0.2/topograph.cabal
--- old/topograph-1.0.0.1/topograph.cabal       2001-09-09 03:46:40.000000000 
+0200
+++ new/topograph-1.0.0.2/topograph.cabal       2001-09-09 03:46:40.000000000 
+0200
@@ -1,6 +1,6 @@
 cabal-version:   2.2
 name:            topograph
-version:         1.0.0.1
+version:         1.0.0.2
 synopsis:        Directed acyclic graphs.
 category:        Data, Graph
 description:
@@ -35,8 +35,11 @@
    || ==8.2.2
    || ==8.4.4
    || ==8.6.5
-   || ==8.8.3
-   || ==8.10.1
+   || ==8.8.4
+   || ==8.10.4
+   || ==9.0.2
+   || ==9.2.4
+   || ==9.4.1
 
 source-repository head
   type:     git
@@ -45,11 +48,11 @@
 library
   exposed-modules:  Topograph
   build-depends:
-    , base          >=4.6     && <4.15
-    , base-compat   ^>=0.10.5 || ^>=0.11.0
+    , base          >=4.6     && <4.18
+    , base-compat   ^>=0.10.5 || ^>=0.11.0 || ^>=0.12.0
     , base-orphans  ^>=0.8
     , containers    ^>=0.5.0.0 || ^>=0.6.0.1
-    , vector        ^>=0.12
+    , vector        ^>=0.12 || ^>=0.13
 
   other-extensions:
     RankNTypes

Reply via email to