Hello community, here is the log from the commit of package ghc-asn1-encoding for openSUSE:Factory checked in at 2016-06-14 23:08:18 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-asn1-encoding (Old) and /work/SRC/openSUSE:Factory/.ghc-asn1-encoding.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-asn1-encoding" Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-asn1-encoding/ghc-asn1-encoding.changes 2015-10-06 13:24:20.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-asn1-encoding.new/ghc-asn1-encoding.changes 2016-06-14 23:08:23.000000000 +0200 @@ -1,0 +2,5 @@ +Sun Jun 12 11:39:48 UTC 2016 - [email protected] + +- update to 0.9.4 + +------------------------------------------------------------------- Old: ---- asn1-encoding-0.9.3.tar.gz New: ---- asn1-encoding-0.9.4.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-asn1-encoding.spec ++++++ --- /var/tmp/diff_new_pack.IL8LkK/_old 2016-06-14 23:08:24.000000000 +0200 +++ /var/tmp/diff_new_pack.IL8LkK/_new 2016-06-14 23:08:24.000000000 +0200 @@ -21,7 +21,7 @@ %bcond_with tests Name: ghc-asn1-encoding -Version: 0.9.3 +Version: 0.9.4 Release: 0 Summary: ASN1 data reader and writer in RAW, BER and DER forms License: BSD-3-Clause ++++++ asn1-encoding-0.9.3.tar.gz -> asn1-encoding-0.9.4.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/asn1-encoding-0.9.3/Data/ASN1/Get.hs new/asn1-encoding-0.9.4/Data/ASN1/Get.hs --- old/asn1-encoding-0.9.3/Data/ASN1/Get.hs 2015-09-21 15:12:05.000000000 +0200 +++ new/asn1-encoding-0.9.4/Data/ASN1/Get.hs 2016-06-12 08:05:07.000000000 +0200 @@ -33,7 +33,6 @@ import Foreign import qualified Data.ByteString as B -import qualified Data.ByteString.Unsafe as B -- | The result of a parse. data Result r = Fail String @@ -185,13 +184,17 @@ -- | Pull @n@ bytes from the input, as a strict ByteString. getBytes :: Int -> Get B.ByteString -getBytes n = do - s <- ensure n - put (fromIntegral n) $ B.unsafeDrop n s - return $ B.unsafeTake n s +getBytes n + | n <= 0 = return B.empty + | otherwise = do + s <- ensure n + let (b1, b2) = B.splitAt n s + put (fromIntegral n) b2 + return b1 getWord8 :: Get Word8 getWord8 = do - s <- ensure 1 - put 1 $ B.unsafeTail s - return $ B.unsafeHead s + s <- ensure 1 + case B.uncons s of + Nothing -> error "getWord8: ensure internal error" + Just (h,b2) -> put 1 b2 >> return h diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/asn1-encoding-0.9.3/asn1-encoding.cabal new/asn1-encoding-0.9.4/asn1-encoding.cabal --- old/asn1-encoding-0.9.3/asn1-encoding.cabal 2015-09-21 15:12:05.000000000 +0200 +++ new/asn1-encoding-0.9.4/asn1-encoding.cabal 2016-06-12 08:05:07.000000000 +0200 @@ -1,5 +1,5 @@ Name: asn1-encoding -Version: 0.9.3 +Version: 0.9.4 Synopsis: ASN1 data reader and writer in RAW, BER and DER forms Description: ASN1 data reader and writer in raw form with supports for high level forms of ASN1 (BER, and DER).
