From b4d1a278b3a46a7750f0ab57a7b46f14769cd689 Mon Sep 17 00:00:00 2001 From: Vincent Hanquez Date: Sun, 3 May 2015 08:43:32 +0100 Subject: [PATCH] [QA] remove unnecessary module, and allow on more module to use CPP --- Crypto/Cipher/Types/GF.hs | 3 +-- QA.hs | 1 + 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Crypto/Cipher/Types/GF.hs b/Crypto/Cipher/Types/GF.hs index 26cf885..ab77dbd 100644 --- a/Crypto/Cipher/Types/GF.hs +++ b/Crypto/Cipher/Types/GF.hs @@ -13,12 +13,11 @@ module Crypto.Cipher.Types.GF xtsGFMul ) where -import Control.Applicative +import Crypto.Internal.Imports import Crypto.Internal.ByteArray (ByteArray, withByteArray) import qualified Crypto.Internal.ByteArray as B import Foreign.Storable import Foreign.Ptr -import Data.Word import Data.Bits -- block size need to be 128 bits. diff --git a/QA.hs b/QA.hs index 8d25790..456bcb3 100644 --- a/QA.hs +++ b/QA.hs @@ -25,6 +25,7 @@ perModuleAllowedExtensions = , ("Crypto/Internal/Memory.hs", [MagicHash, UnboxedTuples]) , ("Crypto/Internal/Compat.hs", [CPP]) , ("Crypto/Internal/CompatPrim.hs", [CPP,MagicHash]) + , ("Crypto/Internal/Endian.hs", [CPP]) ] disallowedModules =