[Pkg-haskell-commits] darcs: haskell-nettle: Guard annotations against platforms without ghci.

Clint Adams clint at debian.org
Tue Dec 10 14:04:44 UTC 2013


Tue Dec 10 14:04:40 UTC 2013  Clint Adams <clint at debian.org>
  * Guard annotations against platforms without ghci.

    M ./changelog +6
    A ./patches/no_ann_without_ghci
    M ./patches/series +1

Tue Dec 10 14:04:40 UTC 2013  Clint Adams <clint at debian.org>
  * Guard annotations against platforms without ghci.
diff -rN -u old-haskell-nettle/changelog new-haskell-nettle/changelog
--- old-haskell-nettle/changelog	2013-12-10 14:04:44.413630644 +0000
+++ new-haskell-nettle/changelog	2013-12-10 14:04:44.413630644 +0000
@@ -1,3 +1,9 @@
+haskell-nettle (0.1.0-2) UNRELEASED; urgency=low
+
+  * Guard annotations against platforms without ghci.
+
+ -- Clint Adams <clint at debian.org>  Tue, 10 Dec 2013 09:03:57 -0500
+
 haskell-nettle (0.1.0-1) unstable; urgency=low
 
   * Initial release.
diff -rN -u old-haskell-nettle/patches/no_ann_without_ghci new-haskell-nettle/patches/no_ann_without_ghci
--- old-haskell-nettle/patches/no_ann_without_ghci	1970-01-01 00:00:00.000000000 +0000
+++ new-haskell-nettle/patches/no_ann_without_ghci	2013-12-10 14:04:44.417630645 +0000
@@ -0,0 +1,85 @@
+Index: haskell-nettle-0.1.0/src/Crypto/Nettle/CCM.hs
+===================================================================
+--- haskell-nettle-0.1.0.orig/src/Crypto/Nettle/CCM.hs	2013-10-19 10:01:14.000000000 -0400
++++ haskell-nettle-0.1.0/src/Crypto/Nettle/CCM.hs	2013-12-10 09:02:56.509055511 -0500
+@@ -46,7 +46,9 @@
+ import Nettle.Utils
+ 
+ -- internal functions are not camelCase on purpose
++#ifndef DEBIAN_NO_GHCI
+ {-# ANN module "HLint: ignore Use camelCase" #-}
++#endif
+ 
+ -- ccm needs a 128-bit block cipher
+ 
+Index: haskell-nettle-0.1.0/src/Crypto/Nettle/Ciphers.hs
+===================================================================
+--- haskell-nettle-0.1.0.orig/src/Crypto/Nettle/Ciphers.hs	2013-10-19 10:01:14.000000000 -0400
++++ haskell-nettle-0.1.0/src/Crypto/Nettle/Ciphers.hs	2013-12-10 09:03:03.945194778 -0500
+@@ -73,7 +73,9 @@
+ import Nettle.Utils
+ 
+ -- internal functions are not camelCase on purpose
++#ifndef DEBIAN_NO_GHCI
+ {-# ANN module "HLint: ignore Use camelCase" #-}
++#endif
+ 
+ #define INSTANCE_CIPHER(Typ) \
+ instance Cipher Typ where \
+Index: haskell-nettle-0.1.0/src/Crypto/Nettle/Ciphers/Internal.hs
+===================================================================
+--- haskell-nettle-0.1.0.orig/src/Crypto/Nettle/Ciphers/Internal.hs	2013-10-19 10:01:14.000000000 -0400
++++ haskell-nettle-0.1.0/src/Crypto/Nettle/Ciphers/Internal.hs	2013-12-10 09:03:09.061290201 -0500
+@@ -39,7 +39,9 @@
+ import Crypto.Nettle.Ciphers.ForeignImports
+ 
+ -- internal functions are not camelCase on purpose
++#ifndef DEBIAN_NO_GHCI
+ {-# ANN module "HLint: ignore Use camelCase" #-}
++#endif
+ 
+ class NettleCipher c where
+ 	-- | pointer to new context, key length, (const) key pointer
+Index: haskell-nettle-0.1.0/src/Crypto/Nettle/Hash.hs
+===================================================================
+--- haskell-nettle-0.1.0.orig/src/Crypto/Nettle/Hash.hs	2013-10-19 10:01:14.000000000 -0400
++++ haskell-nettle-0.1.0/src/Crypto/Nettle/Hash.hs	2013-12-10 09:03:14.489391831 -0500
+@@ -69,7 +69,9 @@
+ import qualified Data.ByteString.Internal as B
+ 
+ -- internal functions are not camelCase on purpose
++#ifndef DEBIAN_NO_GHCI
+ {-# ANN module "HLint: ignore Use camelCase" #-}
++#endif
+ 
+ nettleHashBlockSize  :: NettleHashAlgorithm a => Tagged a Int
+ nettleHashBlockSize = nha_block_size
+Index: haskell-nettle-0.1.0/src/Crypto/Nettle/UMAC.hs
+===================================================================
+--- haskell-nettle-0.1.0.orig/src/Crypto/Nettle/UMAC.hs	2013-10-19 10:01:14.000000000 -0400
++++ haskell-nettle-0.1.0/src/Crypto/Nettle/UMAC.hs	2013-12-10 09:03:24.437577908 -0500
+@@ -38,7 +38,9 @@
+ import Crypto.Nettle.Hash.ForeignImports
+ 
+ -- internal functions are not camelCase on purpose
++#ifndef DEBIAN_NO_GHCI
+ {-# ANN module "HLint: ignore Use camelCase" #-}
++#endif
+ 
+ {-|
+ 'UMAC' is a class of keyed hash algorithms that take an additional nonce.
+Index: haskell-nettle-0.1.0/src/Tests/Ciphers.hs
+===================================================================
+--- haskell-nettle-0.1.0.orig/src/Tests/Ciphers.hs	2013-10-19 10:01:14.000000000 -0400
++++ haskell-nettle-0.1.0/src/Tests/Ciphers.hs	2013-12-10 09:03:34.185760194 -0500
+@@ -75,8 +75,9 @@
+ 			, label "ctrCombine + ctrCombine 10 blocks" $ (ctrCombine c iv . ctrCombine c iv) block10 == block10
+ 			, label "ctrCombine + ctrCombine unaligned" $ (ctrCombine c iv . ctrCombine c iv) input   == input
+ 			]
+-
++#ifndef DEBIAN_NO_GHCI
+ {-# ANN module "HLint: ignore Reduce duplication" #-}
++#endif
+ genStreamTest :: StreamCipher c => c -> Test
+ genStreamTest c' = testProperty ("generated " ++ cipherName c' ++ " stream cipher test") $ do
+ 	c <- genCipher c'
diff -rN -u old-haskell-nettle/patches/series new-haskell-nettle/patches/series
--- old-haskell-nettle/patches/series	2013-12-10 14:04:44.413630644 +0000
+++ new-haskell-nettle/patches/series	2013-12-10 14:04:44.417630645 +0000
@@ -1 +1,2 @@
 disable-leaky-tests.diff
+no_ann_without_ghci




More information about the Pkg-haskell-commits mailing list