Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-base-compat for openSUSE:Factory
checked in at 2021-09-10 23:41:04
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-base-compat (Old)
and /work/SRC/openSUSE:Factory/.ghc-base-compat.new.1899 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-base-compat"
Fri Sep 10 23:41:04 2021 rev:18 rq:917477 version:0.12.0
Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-base-compat/ghc-base-compat.changes
2020-12-22 11:35:14.689245413 +0100
+++
/work/SRC/openSUSE:Factory/.ghc-base-compat.new.1899/ghc-base-compat.changes
2021-09-10 23:41:16.346556905 +0200
@@ -1,0 +2,9 @@
+Thu Sep 2 08:32:54 UTC 2021 - [email protected]
+
+- Update base-compat to version 0.12.0.
+ Upstream has edited the change log file since the last release in
+ a non-trivial way, i.e. they did more than just add a new entry
+ at the top. You can review the file at:
+ http://hackage.haskell.org/package/base-compat-0.12.0/src/CHANGES.markdown
+
+-------------------------------------------------------------------
Old:
----
base-compat-0.11.2.tar.gz
New:
----
base-compat-0.12.0.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-base-compat.spec ++++++
--- /var/tmp/diff_new_pack.mJZclJ/_old 2021-09-10 23:41:17.722558369 +0200
+++ /var/tmp/diff_new_pack.mJZclJ/_new 2021-09-10 23:41:17.722558369 +0200
@@ -1,7 +1,7 @@
#
# spec file for package ghc-base-compat
#
-# 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
@@ -18,7 +18,7 @@
%global pkg_name base-compat
Name: ghc-%{pkg_name}
-Version: 0.11.2
+Version: 0.12.0
Release: 0
Summary: A compatibility layer for base
License: MIT
++++++ base-compat-0.11.2.tar.gz -> base-compat-0.12.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/CHANGES.markdown
new/base-compat-0.12.0/CHANGES.markdown
--- old/base-compat-0.11.2/CHANGES.markdown 2001-09-09 03:46:40.000000000
+0200
+++ new/base-compat-0.12.0/CHANGES.markdown 2001-09-09 03:46:40.000000000
+0200
@@ -1,7 +1,15 @@
+## Changes in 0.12.0 [2021.08.29]
+ - Sync with `base-4.16`/GHC 9.2
+ - `Data.Semigroup.Compat{.Repl}` no longer re-exports the `Option` data type
+ or the `option` function, as both have been removed in `base-4.16`.
+ - Backport `readBin` and `showBin` to `Numeric.Compat`
+ - Backport `readBinP` to `Text.Read.Lex.Compat`
+
## Changes in 0.11.2 [2020.09.30]
- Sync with `base-4.15`/GHC 9.0
- - Backport `singleton` to `Data.List` and `Data.List.NonEmpty`
- - Backport `hGetContents'`, `getContents'`, and `readFile'` added to
`System.IO`
+ - Backport `singleton` to `Data.List.Compat` and `Data.List.NonEmpty.Compat`
+ - Backport `hGetContents'`, `getContents'`, and `readFile'` added to
+ `System.IO.Compat`
## Changes in 0.11.1 [2020.01.27]
- Sync with `base-4.14`/GHC 8.10
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/README.markdown
new/base-compat-0.12.0/README.markdown
--- old/base-compat-0.11.2/README.markdown 2001-09-09 03:46:40.000000000
+0200
+++ new/base-compat-0.12.0/README.markdown 2001-09-09 03:46:40.000000000
+0200
@@ -145,7 +145,7 @@
* `callocArray` and `callocArray0` functions to `Foreign.Marshal.Array.Compat`
* `fillBytes` to `Foreign.Marshal.Utils.Compat`
* Added `Data.List.Compat.scanl'`
- * `showFFloatAlt` and `showGFloatAlt` to `Numeric.Compat`
+ * `showFFloatAlt`, `showGFloatAlt`, `readBin`, and `showBin` to
`Numeric.Compat`
* `lookupEnv`, `setEnv` and `unsetEnv` to `System.Environment.Compat`
* `unsafeFixIO` and `unsafeDupablePerformIO` to `System.IO.Unsafe.IO`
* `RuntimeRep`-polymorphic `($!)` to `Prelude.Compat`
@@ -153,7 +153,8 @@
* `isResourceVanishedError`, `resourceVanishedErrorType`, and
`isResourceVanishedErrorType` to `System.IO.Error.Compat`
* `singleton` to `Data.List.Compat` and `Data.List.NonEmpty.Compat`
- * `hGetContents'`, `getContents'`, and `readFile'` to `System.IO`
+ * `hGetContents'`, `getContents'`, and `readFile'` to `System.IO.Compat`
+ * `readBinP` to `Text.Read.Lex.Compat`
## What is not covered
@@ -306,6 +307,7 @@
## Supported versions of GHC/`base`
+ * `ghc-9.2.*` / `base-4.16.*`
* `ghc-9.0.*` / `base-4.15.*`
* `ghc-8.10.*` / `base-4.14.*`
* `ghc-8.8.*` / `base-4.13.*`
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/base-compat.cabal
new/base-compat-0.12.0/base-compat.cabal
--- old/base-compat-0.11.2/base-compat.cabal 2001-09-09 03:46:40.000000000
+0200
+++ new/base-compat-0.12.0/base-compat.cabal 2001-09-09 03:46:40.000000000
+0200
@@ -1,5 +1,5 @@
name: base-compat
-version: 0.11.2
+version: 0.12.0
license: MIT
license-file: LICENSE
copyright: (c) 2012-2018 Simon Hengel,
@@ -43,18 +43,6 @@
module with the suffix @.Repl@, which are distinct from
anything in @base-compat-batteries@, to allow for easier
use in GHCi.
-tested-with: GHC == 7.0.4
- , GHC == 7.2.2
- , GHC == 7.4.2
- , GHC == 7.6.3
- , GHC == 7.8.4
- , GHC == 7.10.3
- , GHC == 8.0.2
- , GHC == 8.2.2
- , GHC == 8.4.4
- , GHC == 8.6.5
- , GHC == 8.8.3
- , GHC == 8.10.1
extra-source-files: CHANGES.markdown, README.markdown
source-repository head
@@ -138,6 +126,7 @@
System.IO.Error.Compat
System.IO.Unsafe.Compat
Text.Read.Compat
+ Text.Read.Lex.Compat
Type.Reflection.Compat
Control.Concurrent.Compat.Repl
@@ -198,4 +187,5 @@
System.IO.Error.Compat.Repl
System.IO.Unsafe.Compat.Repl
Text.Read.Compat.Repl
+ Text.Read.Lex.Compat.Repl
Type.Reflection.Compat.Repl
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/src/Data/Semigroup/Compat.hs
new/base-compat-0.12.0/src/Data/Semigroup/Compat.hs
--- old/base-compat-0.11.2/src/Data/Semigroup/Compat.hs 2001-09-09
03:46:40.000000000 +0200
+++ new/base-compat-0.12.0/src/Data/Semigroup/Compat.hs 2001-09-09
03:46:40.000000000 +0200
@@ -21,9 +21,6 @@
, Any(..)
, Sum(..)
, Product(..)
- -- * A better monoid for Maybe
- , Option(..)
- , option
-- * Difference lists of a semigroup
, diff
, cycle1
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/src/Numeric/Compat.hs
new/base-compat-0.12.0/src/Numeric/Compat.hs
--- old/base-compat-0.11.2/src/Numeric/Compat.hs 2001-09-09
03:46:40.000000000 +0200
+++ new/base-compat-0.12.0/src/Numeric/Compat.hs 2001-09-09
03:46:40.000000000 +0200
@@ -1,20 +1,24 @@
{-# LANGUAGE CPP, NoImplicitPrelude #-}
module Numeric.Compat (
module Base
+, showBin
, showFFloatAlt
, showGFloatAlt
, showHFloat
+, readBin
) where
import Numeric as Base
#if !(MIN_VERSION_base(4,7,0))
-import Data.Char (intToDigit)
import GHC.Float
#endif
-#if !(MIN_VERSION_base(4,11,0))
+#if !(MIN_VERSION_base(4,16,0))
+import Data.Char (intToDigit)
import Prelude
+import Text.ParserCombinators.ReadP (readP_to_S)
+import qualified Text.Read.Lex.Compat as L
#endif
#if !(MIN_VERSION_base(4,7,0))
@@ -151,3 +155,16 @@
x : more -> x == 0 && allZ more
[] -> True
#endif
+
+#if !(MIN_VERSION_base(4,16,0))
+-- | Read an unsigned number in binary notation.
+--
+-- >>> readBin "10011"
+-- [(19,"")]
+readBin :: (Eq a, Num a) => ReadS a
+readBin = readP_to_S L.readBinP
+
+-- | Show /non-negative/ 'Integral' numbers in base 2.
+showBin :: (Integral a, Show a) => a -> ShowS
+showBin = showIntAtBase 2 intToDigit
+#endif
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/src/Text/Read/Lex/Compat/Repl.hs
new/base-compat-0.12.0/src/Text/Read/Lex/Compat/Repl.hs
--- old/base-compat-0.11.2/src/Text/Read/Lex/Compat/Repl.hs 1970-01-01
01:00:00.000000000 +0100
+++ new/base-compat-0.12.0/src/Text/Read/Lex/Compat/Repl.hs 2001-09-09
03:46:40.000000000 +0200
@@ -0,0 +1,8 @@
+{-# LANGUAGE PackageImports #-}
+{-# OPTIONS_GHC -fno-warn-dodgy-exports -fno-warn-unused-imports #-}
+-- | Reexports "Text.Read.Lex.Compat"
+-- from a globally unique namespace.
+module Text.Read.Lex.Compat.Repl (
+ module Text.Read.Lex.Compat
+) where
+import "this" Text.Read.Lex.Compat
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/base-compat-0.11.2/src/Text/Read/Lex/Compat.hs
new/base-compat-0.12.0/src/Text/Read/Lex/Compat.hs
--- old/base-compat-0.11.2/src/Text/Read/Lex/Compat.hs 1970-01-01
01:00:00.000000000 +0100
+++ new/base-compat-0.12.0/src/Text/Read/Lex/Compat.hs 2001-09-09
03:46:40.000000000 +0200
@@ -0,0 +1,34 @@
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+#if __GLASGOW_HASKELL__ >= 702
+{-# LANGUAGE Trustworthy #-}
+#endif
+module Text.Read.Lex.Compat (
+ module Base
+, readBinP
+) where
+
+import Text.Read.Lex as Base
+
+#if !(MIN_VERSION_base(4,16,0))
+import Data.Char (ord)
+import Prelude
+import Text.ParserCombinators.ReadP (ReadP)
+#endif
+
+#if !(MIN_VERSION_base(4,16,0))
+readBinP :: (Eq a, Num a) => ReadP a
+readBinP = readIntP'2
+{-# SPECIALISE readBinP :: ReadP Integer #-}
+
+readIntP'2 :: (Eq a, Num a) => ReadP a
+readIntP'2 = readIntP 2 isDigit valDigit
+ where
+ isDigit c = maybe False (const True) (valDig2 c)
+ valDigit c = maybe 0 id (valDig2 c)
+{-# SPECIALISE readIntP'2 :: ReadP Integer #-}
+
+valDig2 :: Char -> Maybe Int
+valDig2 c
+ | '0' <= c && c <= '1' = Just (ord c - ord '0')
+ | otherwise = Nothing
+#endif
