Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-network-byte-order for
openSUSE:Factory checked in at 2023-10-18 21:26:00
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-network-byte-order (Old)
and /work/SRC/openSUSE:Factory/.ghc-network-byte-order.new.31755 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-network-byte-order"
Wed Oct 18 21:26:00 2023 rev:7 rq:1118482 version:0.1.7
Changes:
--------
---
/work/SRC/openSUSE:Factory/ghc-network-byte-order/ghc-network-byte-order.changes
2023-04-04 21:21:51.861687603 +0200
+++
/work/SRC/openSUSE:Factory/.ghc-network-byte-order.new.31755/ghc-network-byte-order.changes
2023-10-18 21:26:16.545930749 +0200
@@ -1,0 +2,6 @@
+Thu Oct 12 01:29:09 UTC 2023 - Peter Simons <[email protected]>
+
+- Update network-byte-order to version 0.1.7.
+ Upstream does not provide a change log file.
+
+-------------------------------------------------------------------
Old:
----
network-byte-order-0.1.6.tar.gz
network-byte-order.cabal
New:
----
network-byte-order-0.1.7.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-network-byte-order.spec ++++++
--- /var/tmp/diff_new_pack.pMpCID/_old 2023-10-18 21:26:17.493965092 +0200
+++ /var/tmp/diff_new_pack.pMpCID/_new 2023-10-18 21:26:17.497965237 +0200
@@ -18,15 +18,13 @@
%global pkg_name network-byte-order
%global pkgver %{pkg_name}-%{version}
-%bcond_with tests
Name: ghc-%{pkg_name}
-Version: 0.1.6
+Version: 0.1.7
Release: 0
Summary: Network byte order utilities
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/1.cabal#/%{pkg_name}.cabal
BuildRequires: ghc-Cabal-devel
BuildRequires: ghc-base-devel
BuildRequires: ghc-base-prof
@@ -34,10 +32,6 @@
BuildRequires: ghc-bytestring-prof
BuildRequires: ghc-rpm-macros
ExcludeArch: %{ix86}
-%if %{with tests}
-BuildRequires: ghc-doctest-devel
-BuildRequires: ghc-doctest-prof
-%endif
%description
Peek and poke functions for network byte order.
@@ -71,7 +65,6 @@
%prep
%autosetup -n %{pkg_name}-%{version}
-cp -p %{SOURCE1} %{pkg_name}.cabal
%build
%ghc_lib_build
@@ -79,9 +72,6 @@
%install
%ghc_lib_install
-%check
-%cabal_test
-
%post devel
%ghc_pkg_recache
++++++ network-byte-order-0.1.6.tar.gz -> network-byte-order-0.1.7.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/network-byte-order-0.1.6/Network/ByteOrder.hs
new/network-byte-order-0.1.7/Network/ByteOrder.hs
--- old/network-byte-order-0.1.6/Network/ByteOrder.hs 2020-09-28
07:01:20.000000000 +0200
+++ new/network-byte-order-0.1.7/Network/ByteOrder.hs 2001-09-09
03:46:40.000000000 +0200
@@ -85,6 +85,7 @@
import System.IO.Unsafe (unsafeDupablePerformIO)
-- $setup
+-- >>> :set -XOverloadedStrings
-- >>> import Data.ByteString hiding (foldl')
-- >>> import Data.Word
-- >>> import Data.List
@@ -426,7 +427,7 @@
-- | Write three bytes and ff one byte.
-- If buffer overrun occurs, 'BufferOverrun' is thrown.
--
--- >>> withWriteBuffer 3 $ \wbuf -> write24 wbuf (65 * 256^2 + 66 * 256 + 67)
+-- >>> withWriteBuffer 3 $ \wbuf -> write24 wbuf (65 * 256^(2 :: Int) + 66 *
256 + 67)
-- "ABC"
write24 :: WriteBuffer -> Word32 -> IO ()
write24 WriteBuffer{..} w = do
@@ -440,7 +441,7 @@
-- | Write four bytes and ff one byte.
-- If buffer overrun occurs, 'BufferOverrun' is thrown.
--
--- >>> withWriteBuffer 4 $ \wbuf -> write32 wbuf (65 * 256^3 + 66 * 256^2 + 67
* 256 + 68)
+-- >>> withWriteBuffer 4 $ \wbuf -> write32 wbuf (65 * 256^(3 :: Int) + 66 *
256^(2 :: Int) + 67 * 256 + 68)
-- "ABCD"
write32 :: WriteBuffer -> Word32 -> IO ()
write32 WriteBuffer{..} w = do
@@ -585,6 +586,7 @@
-- | Returning the length of the remaining
remainingSize :: a -> IO Int
-- | Executing an action on the current offset pointer.
+ position :: a -> IO Int
withCurrentOffSet :: a -> (Buffer -> IO b) -> IO b
-- | Memorizing the current offset pointer.
save :: a -> IO ()
@@ -624,6 +626,9 @@
remainingSize WriteBuffer{..} = do
ptr <- readIORef offset
return $ limit `minusPtr` ptr
+ position WriteBuffer{..} = do
+ ptr <- readIORef offset
+ return $ ptr `minusPtr` start
{-# INLINE withCurrentOffSet #-}
withCurrentOffSet WriteBuffer{..} action = readIORef offset >>= action
{-# INLINE save #-}
@@ -647,6 +652,8 @@
ff (ReadBuffer w) = ff w
{-# INLINE remainingSize #-}
remainingSize (ReadBuffer w) = remainingSize w
+ {-# INLINE position #-}
+ position (ReadBuffer w) = position w
{-# INLINE withCurrentOffSet #-}
withCurrentOffSet (ReadBuffer w) = withCurrentOffSet w
{-# INLINE save #-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/network-byte-order-0.1.6/network-byte-order.cabal
new/network-byte-order-0.1.7/network-byte-order.cabal
--- old/network-byte-order-0.1.6/network-byte-order.cabal 2020-09-28
07:01:20.000000000 +0200
+++ new/network-byte-order-0.1.7/network-byte-order.cabal 2001-09-09
03:46:40.000000000 +0200
@@ -1,42 +1,24 @@
--- Initial network-byte-order.cabal generated by cabal init. For further
--- documentation, see http://haskell.org/cabal/users-guide/
+cabal-version: >=1.10
+name: network-byte-order
+version: 0.1.7
+license: BSD3
+license-file: LICENSE
+maintainer: [email protected]
+author: Kazu Yamamoto
+synopsis: Network byte order utilities
+description: Peek and poke functions for network byte order.
+category: Network
+build-type: Simple
-name: network-byte-order
-version: 0.1.6
-synopsis: Network byte order utilities
-description: Peek and poke functions for network byte order.
-license: BSD3
-license-file: LICENSE
-author: Kazu Yamamoto
-maintainer: [email protected]
--- copyright:
-category: Network
-build-type: Simple
--- extra-source-files: ChangeLog.md
-cabal-version: >= 1.10
+source-repository head
+ type: git
+ location: git://github.com/kazu-yamamoto/network-byte-order.git
library
- ghc-options: -Wall
- exposed-modules: Network.ByteOrder
- -- other-modules:
- -- other-extensions:
- build-depends: base >= 4.8 && < 5
- , bytestring
- -- hs-source-dirs:
- default-language: Haskell2010
- if impl(ghc >= 8)
- default-extensions: Strict StrictData
-
-test-suite doctest
- type: exitcode-stdio-1.0
- default-language: Haskell2010
- hs-source-dirs: test
- ghc-options: -Wall
- main-is: doctests.hs
- build-depends: base
- , bytestring
- , doctest
-
-source-repository head
- type: git
- location: git://github.com/kazu-yamamoto/network-byte-order.git
+ exposed-modules: Network.ByteOrder
+ default-language: Haskell2010
+ default-extensions: Strict StrictData
+ ghc-options: -Wall
+ build-depends:
+ base >=4.9 && <5,
+ bytestring
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/network-byte-order-0.1.6/test/doctests.hs
new/network-byte-order-0.1.7/test/doctests.hs
--- old/network-byte-order-0.1.6/test/doctests.hs 2020-09-28
07:01:20.000000000 +0200
+++ new/network-byte-order-0.1.7/test/doctests.hs 1970-01-01
01:00:00.000000000 +0100
@@ -1,10 +0,0 @@
-module Main where
-
-import Test.DocTest
-
-main :: IO ()
-main = doctest [
- "-XOverloadedStrings"
- , "-XCPP"
- , "Network/ByteOrder.hs"
- ]
