Hello community,

here is the log from the commit of package ghc-mersenne-random-pure64 for 
openSUSE:Factory checked in at 2017-03-14 10:05:32
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-mersenne-random-pure64 (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-mersenne-random-pure64.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-mersenne-random-pure64"

Tue Mar 14 10:05:32 2017 rev:2 rq:461658 version:0.2.2.0

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/ghc-mersenne-random-pure64/ghc-mersenne-random-pure64.changes
    2016-11-02 12:35:46.000000000 +0100
+++ 
/work/SRC/openSUSE:Factory/.ghc-mersenne-random-pure64.new/ghc-mersenne-random-pure64.changes
       2017-03-14 10:05:34.264668797 +0100
@@ -1,0 +2,5 @@
+Sun Feb 12 14:16:52 UTC 2017 - psim...@suse.com
+
+- Update to version 0.2.2.0 with cabal2obs.
+
+-------------------------------------------------------------------

Old:
----
  mersenne-random-pure64-0.2.0.5.tar.gz

New:
----
  mersenne-random-pure64-0.2.2.0.tar.gz

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

Other differences:
------------------
++++++ ghc-mersenne-random-pure64.spec ++++++
--- /var/tmp/diff_new_pack.2zgEfE/_old  2017-03-14 10:05:34.928574787 +0100
+++ /var/tmp/diff_new_pack.2zgEfE/_new  2017-03-14 10:05:34.932574221 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-mersenne-random-pure64
 #
-# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2017 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,20 +18,18 @@
 
 %global pkg_name mersenne-random-pure64
 Name:           ghc-%{pkg_name}
-Version:        0.2.0.5
+Version:        0.2.2.0
 Release:        0
 Summary:        Generate high quality pseudorandom numbers purely using a 
Mersenne Twister
 License:        BSD-3-Clause
-Group:          System/Libraries
+Group:          Development/Languages/Other
 Url:            https://hackage.haskell.org/package/%{pkg_name}
 Source0:        
https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
 BuildRequires:  ghc-Cabal-devel
-# Begin cabal-rpm deps:
-BuildRequires:  ghc-old-time-devel
 BuildRequires:  ghc-random-devel
 BuildRequires:  ghc-rpm-macros
+BuildRequires:  ghc-time-devel
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
-# End cabal-rpm deps
 
 %description
 The Mersenne twister is a pseudorandom number generator developed by Makoto
@@ -62,15 +60,12 @@
 %prep
 %setup -q -n %{pkg_name}-%{version}
 
-
 %build
 %ghc_lib_build
 
-
 %install
 %ghc_lib_install
 
-
 %post devel
 %ghc_pkg_recache
 

++++++ mersenne-random-pure64-0.2.0.5.tar.gz -> 
mersenne-random-pure64-0.2.2.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/mersenne-random-pure64-0.2.0.5/System/Random/Mersenne/Pure64.hs 
new/mersenne-random-pure64-0.2.2.0/System/Random/Mersenne/Pure64.hs
--- old/mersenne-random-pure64-0.2.0.5/System/Random/Mersenne/Pure64.hs 
2016-03-10 16:37:22.000000000 +0100
+++ new/mersenne-random-pure64-0.2.2.0/System/Random/Mersenne/Pure64.hs 
2016-08-29 15:53:28.000000000 +0200
@@ -48,19 +48,27 @@
 import System.Random
 import Data.Word
 import Data.Int
-import System.Time
+import Data.Time.Clock
+import Data.Time.Calendar
 import System.CPUTime
 
 -- | Create a PureMT generator from a 'Word64' seed.
 pureMT :: Word64 -> PureMT
 pureMT = mkPureMT . seedBlock . fromIntegral
 
+#if !MIN_VERSION_time(1,6,0)
+diffTimeToPicoseconds :: DiffTime -> Integer
+diffTimeToPicoseconds d =
+    round (1000 * 1000 * 1000 * 1000 * d)
+#endif
+
 -- | Create a new PureMT generator, using the clocktime as the base for the 
seed.
 newPureMT :: IO PureMT
 newPureMT = do
-    ct             <- getCPUTime
-    (TOD sec psec) <- getClockTime
-    return $ pureMT (fromIntegral $ sec * 1013904242 + psec + ct)
+    ct <- getCPUTime
+    t  <- getCurrentTime
+    let seed = toModifiedJulianDay (utctDay t) + diffTimeToPicoseconds 
(utctDayTime t) + ct
+    return $ pureMT $ fromIntegral seed
 
 ------------------------------------------------------------------------
 -- System.Random interface.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/mersenne-random-pure64-0.2.0.5/mersenne-random-pure64.cabal 
new/mersenne-random-pure64-0.2.2.0/mersenne-random-pure64.cabal
--- old/mersenne-random-pure64-0.2.0.5/mersenne-random-pure64.cabal     
2016-03-10 16:37:22.000000000 +0100
+++ new/mersenne-random-pure64-0.2.2.0/mersenne-random-pure64.cabal     
2016-08-29 15:53:28.000000000 +0200
@@ -1,5 +1,5 @@
 name:            mersenne-random-pure64
-version:         0.2.0.5
+version:         0.2.2.0
 homepage:        http://code.haskell.org/~dons/code/mersenne-random-pure64/
 synopsis:        Generate high quality pseudorandom numbers purely using a 
Mersenne Twister
 description:
@@ -26,7 +26,7 @@
 maintainer:      Don Stewart <don...@gmail.com>
 cabal-version:   >= 1.6.0
 build-type:      Simple
-tested-with:     GHC == 7.6.2, GHC == 7.7
+tested-with:     GHC == 7.6.2, GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.1
 
 source-repository head
   type: git
@@ -46,7 +46,7 @@
     if flag(small_base)
         build-depends: base  < 3
     else
-        build-depends: base >= 3 && < 6, old-time, random
+        build-depends: base >= 3 && < 6, time, random
 
     cc-options:
         -O3 -finline-functions -fomit-frame-pointer


Reply via email to