Hello community, here is the log from the commit of package ghc-quickcheck-text for openSUSE:Factory checked in at 2016-11-02 12:47:29 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-quickcheck-text (Old) and /work/SRC/openSUSE:Factory/.ghc-quickcheck-text.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "ghc-quickcheck-text" Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-quickcheck-text/ghc-quickcheck-text.changes 2016-10-22 13:18:52.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-quickcheck-text.new/ghc-quickcheck-text.changes 2016-11-02 12:47:30.000000000 +0100 @@ -1,0 +2,5 @@ +Mon Sep 26 06:51:54 UTC 2016 - psimons@suse.com + +- Update to version 0.1.2.1 with cabal2obs. + +------------------------------------------------------------------- Old: ---- quickcheck-text-0.1.1.0.tar.gz New: ---- quickcheck-text-0.1.2.1.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-quickcheck-text.spec ++++++ --- /var/tmp/diff_new_pack.bPCBeL/_old 2016-11-02 12:47:31.000000000 +0100 +++ /var/tmp/diff_new_pack.bPCBeL/_new 2016-11-02 12:47:31.000000000 +0100 @@ -19,22 +19,20 @@ %global pkg_name quickcheck-text %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.1.1.0 +Version: 0.1.2.1 Release: 0 Summary: Alternative arbitrary instance for Text License: MIT -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-QuickCheck-devel BuildRequires: ghc-binary-devel BuildRequires: ghc-bytestring-devel BuildRequires: ghc-rpm-macros BuildRequires: ghc-text-devel BuildRoot: %{_tmppath}/%{name}-%{version}-build -# End cabal-rpm deps %description The usual Arbitrary instance for Text (in @@ -58,20 +56,14 @@ %prep %setup -q -n %{pkg_name}-%{version} - %build %ghc_lib_build - %install %ghc_lib_install - %check -%if %{with tests} -%{cabal} test -%endif - +%cabal_test %post devel %ghc_pkg_recache ++++++ quickcheck-text-0.1.1.0.tar.gz -> quickcheck-text-0.1.2.1.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/quickcheck-text-0.1.1.0/quickcheck-text.cabal new/quickcheck-text-0.1.2.1/quickcheck-text.cabal --- old/quickcheck-text-0.1.1.0/quickcheck-text.cabal 2016-06-19 07:32:26.000000000 +0200 +++ new/quickcheck-text-0.1.2.1/quickcheck-text.cabal 2016-09-22 11:15:49.000000000 +0200 @@ -1,5 +1,5 @@ name: quickcheck-text -version: 0.1.1.0 +version: 0.1.2.1 synopsis: Alternative arbitrary instance for Text description: The usual Arbitrary instance for Text (in @@ -26,7 +26,7 @@ library exposed-modules: Test.QuickCheck.Utf8 Data.Text.Arbitrary - build-depends: base >=4.7 && <5 + build-depends: base >=4 && <5 , QuickCheck , binary , bytestring diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/quickcheck-text-0.1.1.0/src/Test/QuickCheck/Utf8.hs new/quickcheck-text-0.1.2.1/src/Test/QuickCheck/Utf8.hs --- old/quickcheck-text-0.1.1.0/src/Test/QuickCheck/Utf8.hs 2016-06-19 07:27:01.000000000 +0200 +++ new/quickcheck-text-0.1.2.1/src/Test/QuickCheck/Utf8.hs 2016-09-22 11:15:49.000000000 +0200 @@ -12,6 +12,8 @@ , shrinkUtf8BS1 -- * Generators for single characters + , genChar + , genUtf8Character , oneByte , twoByte , threeByte @@ -83,6 +85,20 @@ inRange :: Int -> Int -> Gen Word8 inRange lo hi = fmap fromIntegral $ elements [lo..hi] +-- | Generate a valid 'Char'. Note that this is UTF-16, not UTF-8, but +-- the intent is the same: the Arbitrary instance for 'Char' in quickcheck +-- makes no attempt to generate valid non-ASCII characters at this time. +genChar :: Gen Char +genChar = fmap (T.head . decodeUtf8) genUtf8Character + +-- | A valid UTF-8 character, one to three bytes long. +genUtf8Character :: Gen ByteString +genUtf8Character = oneof [ + oneByte + , twoByte + , threeByte + ] + -- | Single-byte UTF-8 (i.e., a standard ASCII byte with a cleared MSB). oneByte :: Gen ByteString oneByte = fmap (BS.pack . return) $