Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-network for openSUSE:Factory checked in at 2022-02-11 23:09:23 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-network (Old) and /work/SRC/openSUSE:Factory/.ghc-network.new.1956 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-network" Fri Feb 11 23:09:23 2022 rev:30 rq:953503 version:3.1.2.7 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-network/ghc-network.changes 2021-11-11 21:37:00.292914158 +0100 +++ /work/SRC/openSUSE:Factory/.ghc-network.new.1956/ghc-network.changes 2022-02-11 23:11:18.167274524 +0100 @@ -1,0 +2,16 @@ +Thu Jan 20 13:31:47 UTC 2022 - Peter Simons <[email protected]> + +- Update network to version 3.1.2.7. + ## Version 3.1.2.7 + + * No change from 3.1.2.6 but to take a right procedure to upload "network" + to Hackage for Windows. + + ## Version 3.1.2.6 + + * Making IPv4PktInfo on Win the same as that on Posix + [#522](https://github.com/haskell/network/issues/522) + * Add support for nix/ghcjs + [#517](https://github.com/haskell/network/issues/517) + +------------------------------------------------------------------- Old: ---- network-3.1.2.5.tar.gz New: ---- network-3.1.2.7.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-network.spec ++++++ --- /var/tmp/diff_new_pack.DUx4En/_old 2022-02-11 23:11:18.627275855 +0100 +++ /var/tmp/diff_new_pack.DUx4En/_new 2022-02-11 23:11:18.631275866 +0100 @@ -1,7 +1,7 @@ # # spec file for package ghc-network # -# Copyright (c) 2021 SUSE LLC +# Copyright (c) 2022 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -19,7 +19,7 @@ %global pkg_name network %bcond_with tests Name: ghc-%{pkg_name} -Version: 3.1.2.5 +Version: 3.1.2.7 Release: 0 Summary: Low-level networking interface License: BSD-3-Clause ++++++ network-3.1.2.5.tar.gz -> network-3.1.2.7.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/CHANGELOG.md new/network-3.1.2.7/CHANGELOG.md --- old/network-3.1.2.5/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/CHANGELOG.md 2001-09-09 03:46:40.000000000 +0200 @@ -1,3 +1,15 @@ +## Version 3.1.2.7 + +* No change from 3.1.2.6 but to take a right procedure to upload "network" + to Hackage for Windows. + +## Version 3.1.2.6 + +* Making IPv4PktInfo on Win the same as that on Posix + [#522](https://github.com/haskell/network/issues/522) +* Add support for nix/ghcjs + [#517](https://github.com/haskell/network/issues/517) + ## Version 3.1.2.5 * Regenerate `configure` script with autoconf-2.69 to temporarily fix broken cabal-3.4.0.0 on Windows. Note that the old one was generated with autoconf-2.71. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/Network/Socket/ByteString/IO.hsc new/network-3.1.2.7/Network/Socket/ByteString/IO.hsc --- old/network-3.1.2.5/Network/Socket/ByteString/IO.hsc 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/Network/Socket/ByteString/IO.hsc 2001-09-09 03:46:40.000000000 +0200 @@ -94,10 +94,13 @@ -> ByteString -- ^ Data to send -> IO () sendAll _ "" = return () -sendAll s bs = do - sent <- send s bs - waitWhen0 sent s - when (sent >= 0) $ sendAll s $ B.drop sent bs +sendAll s bs0 = loop bs0 + where + loop bs = do + -- "send" throws an exception. + sent <- send s bs + waitWhen0 sent s + when (sent /= B.length bs) $ loop $ B.drop sent bs -- | Send data to the socket. The recipient can be specified -- explicitly, so the socket need not be in a connected state. @@ -123,10 +126,13 @@ -> sa -- ^ Recipient address -> IO () sendAllTo _ "" _ = return () -sendAllTo s xs sa = do - sent <- sendTo s xs sa - waitWhen0 sent s - when (sent >= 0) $ sendAllTo s (B.drop sent xs) sa +sendAllTo s bs0 sa = loop bs0 + where + loop bs = do + -- "send" throws an exception. + sent <- sendTo s bs sa + waitWhen0 sent s + when (sent /= B.length bs) $ loop $ B.drop sent bs -- | Send data to the socket. The socket must be in a connected -- state. The data is sent as if the parts have been concatenated. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/Network/Socket/ByteString/Lazy/Posix.hs new/network-3.1.2.7/Network/Socket/ByteString/Lazy/Posix.hs --- old/network-3.1.2.5/Network/Socket/ByteString/Lazy/Posix.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/Network/Socket/ByteString/Lazy/Posix.hs 2001-09-09 03:46:40.000000000 +0200 @@ -51,7 +51,10 @@ -> L.ByteString -- ^ Data to send -> IO () sendAll _ "" = return () -sendAll s bs = do - sent <- send s bs - waitWhen0 (fromIntegral sent) s - when (sent >= 0) $ sendAll s $ L.drop sent bs +sendAll s bs0 = loop bs0 + where + loop bs = do + -- "send" throws an exception. + sent <- send s bs + waitWhen0 (fromIntegral sent) s + when (sent /= L.length bs) $ loop $ L.drop sent bs diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/Network/Socket/ByteString/Lazy/Windows.hs new/network-3.1.2.7/Network/Socket/ByteString/Lazy/Windows.hs --- old/network-3.1.2.5/Network/Socket/ByteString/Lazy/Windows.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/Network/Socket/ByteString/Lazy/Windows.hs 2001-09-09 03:46:40.000000000 +0200 @@ -29,7 +29,10 @@ -> L.ByteString -- ^ Data to send -> IO () sendAll _ "" = return () -sendAll s bs = do - sent <- send s bs - waitWhen0 (fromIntegral sent) s - when (sent >= 0) $ sendAll s $ L.drop sent bs +sendAll s bs0 = loop bs0 + where + loop bs = do + -- "send" throws an exception. + sent <- send s bs + waitWhen0 (fromIntegral sent) s + when (sent /= L.length bs) $ loop $ L.drop sent bs diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/Network/Socket/Win32/Cmsg.hsc new/network-3.1.2.7/Network/Socket/Win32/Cmsg.hsc --- old/network-3.1.2.5/Network/Socket/Win32/Cmsg.hsc 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/Network/Socket/Win32/Cmsg.hsc 2001-09-09 03:46:40.000000000 +0200 @@ -148,11 +148,12 @@ ---------------------------------------------------------------- --- | Network interface ID and local IPv4 address. -data IPv4PktInfo = IPv4PktInfo ULONG HostAddress deriving (Eq) +-- | Network interface ID and local IPv4 address. The second member is +-- redundant to be the same as Unix's one and is always 0.0.0.0. +data IPv4PktInfo = IPv4PktInfo Int HostAddress HostAddress deriving (Eq) instance Show IPv4PktInfo where - show (IPv4PktInfo n ha) = "IPv4PktInfo " ++ show n ++ " " ++ show (hostAddressToTuple ha) + show (IPv4PktInfo n sa ha) = "IPv4PktInfo " ++ show n ++ " " ++ show (hostAddressToTuple sa) ++ " " ++ show (hostAddressToTuple ha) instance ControlMessage IPv4PktInfo where controlMessageId = CmsgIdIPv4PktInfo @@ -160,13 +161,13 @@ instance Storable IPv4PktInfo where sizeOf _ = #{size IN_PKTINFO} alignment _ = #alignment IN_PKTINFO - poke p (IPv4PktInfo n ha) = do + poke p (IPv4PktInfo n _ ha) = do (#poke IN_PKTINFO, ipi_ifindex) p (fromIntegral n :: CInt) (#poke IN_PKTINFO, ipi_addr) p ha peek p = do n <- (#peek IN_PKTINFO, ipi_ifindex) p ha <- (#peek IN_PKTINFO, ipi_addr) p - return $ IPv4PktInfo n ha + return $ IPv4PktInfo n 0 ha ---------------------------------------------------------------- diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/config.sub new/network-3.1.2.7/config.sub --- old/network-3.1.2.5/config.sub 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/config.sub 2001-09-09 03:46:40.000000000 +0200 @@ -1199,6 +1199,7 @@ | hexagon \ | i370 | i*86 | i860 | i960 | ia16 | ia64 \ | ip2k | iq2000 \ + | js \ | k1om \ | le32 | le64 \ | lm32 \ @@ -1748,7 +1749,8 @@ | skyos* | haiku* | rdos* | toppers* | drops* | es* \ | onefs* | tirtos* | phoenix* | fuchsia* | redox* | bme* \ | midnightbsd* | amdhsa* | unleashed* | emscripten* | wasi* \ - | nsk* | powerunix* | genode* | zvmoe* | qnx* | emx* | zephyr*) + | nsk* | powerunix* | genode* | zvmoe* | qnx* | emx* | zephyr* \ + | ghcjs) ;; # This one is extra strict with allowed versions sco3.2v2 | sco3.2v[4-9]* | sco5v6*) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/configure new/network-3.1.2.7/configure --- old/network-3.1.2.5/configure 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/configure 2001-09-09 03:46:40.000000000 +0200 @@ -1,6 +1,6 @@ #! /bin/sh # Guess values for system-dependent variables and create Makefiles. -# Generated by GNU Autoconf 2.69 for Haskell network package 3.1.2.5. +# Generated by GNU Autoconf 2.69 for Haskell network package 3.1.2.7. # # Report bugs to <[email protected]>. # @@ -580,8 +580,8 @@ # Identity of this package. PACKAGE_NAME='Haskell network package' PACKAGE_TARNAME='network' -PACKAGE_VERSION='3.1.2.5' -PACKAGE_STRING='Haskell network package 3.1.2.5' +PACKAGE_VERSION='3.1.2.7' +PACKAGE_STRING='Haskell network package 3.1.2.7' PACKAGE_BUGREPORT='[email protected]' PACKAGE_URL='' @@ -1245,7 +1245,7 @@ # Omit some internal or obsolete options to make the list less imposing. # This message is too long to be a string in the A/UX 3.1 sh. cat <<_ACEOF -\`configure' configures Haskell network package 3.1.2.5 to adapt to many kinds of systems. +\`configure' configures Haskell network package 3.1.2.7 to adapt to many kinds of systems. Usage: $0 [OPTION]... [VAR=VALUE]... @@ -1311,7 +1311,7 @@ if test -n "$ac_init_help"; then case $ac_init_help in - short | recursive ) echo "Configuration of Haskell network package 3.1.2.5:";; + short | recursive ) echo "Configuration of Haskell network package 3.1.2.7:";; esac cat <<\_ACEOF @@ -1396,7 +1396,7 @@ test -n "$ac_init_help" && exit $ac_status if $ac_init_version; then cat <<\_ACEOF -Haskell network package configure 3.1.2.5 +Haskell network package configure 3.1.2.7 generated by GNU Autoconf 2.69 Copyright (C) 2012 Free Software Foundation, Inc. @@ -1922,7 +1922,7 @@ This file contains any messages produced by compilers while running configure, to aid debugging if configure makes a mistake. -It was created by Haskell network package $as_me 3.1.2.5, which was +It was created by Haskell network package $as_me 3.1.2.7, which was generated by GNU Autoconf 2.69. Invocation command line was $ $0 $@ @@ -4429,7 +4429,7 @@ # report actual input values of CONFIG_FILES etc. instead of their # values after options handling. ac_log=" -This file was extended by Haskell network package $as_me 3.1.2.5, which was +This file was extended by Haskell network package $as_me 3.1.2.7, which was generated by GNU Autoconf 2.69. Invocation command line was CONFIG_FILES = $CONFIG_FILES @@ -4482,7 +4482,7 @@ cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`" ac_cs_version="\\ -Haskell network package config.status 3.1.2.5 +Haskell network package config.status 3.1.2.7 configured by $0, generated by GNU Autoconf 2.69, with options \\"\$ac_cs_config\\" diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/configure.ac new/network-3.1.2.7/configure.ac --- old/network-3.1.2.5/configure.ac 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/configure.ac 2001-09-09 03:46:40.000000000 +0200 @@ -1,5 +1,5 @@ AC_INIT([Haskell network package], - [3.1.2.5], + [3.1.2.7], [[email protected]], [network]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/network-3.1.2.5/network.cabal new/network-3.1.2.7/network.cabal --- old/network-3.1.2.5/network.cabal 2001-09-09 03:46:40.000000000 +0200 +++ new/network-3.1.2.7/network.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,6 +1,6 @@ cabal-version: 1.18 name: network -version: 3.1.2.5 +version: 3.1.2.7 license: BSD3 license-file: LICENSE maintainer: Kazu Yamamoto, Evan Borden
