[QA] remove unnecessary module, and allow on more module to use CPP
This commit is contained in:
parent
c23ddb2eaa
commit
b4d1a278b3
@ -13,12 +13,11 @@ module Crypto.Cipher.Types.GF
|
|||||||
xtsGFMul
|
xtsGFMul
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Control.Applicative
|
import Crypto.Internal.Imports
|
||||||
import Crypto.Internal.ByteArray (ByteArray, withByteArray)
|
import Crypto.Internal.ByteArray (ByteArray, withByteArray)
|
||||||
import qualified Crypto.Internal.ByteArray as B
|
import qualified Crypto.Internal.ByteArray as B
|
||||||
import Foreign.Storable
|
import Foreign.Storable
|
||||||
import Foreign.Ptr
|
import Foreign.Ptr
|
||||||
import Data.Word
|
|
||||||
import Data.Bits
|
import Data.Bits
|
||||||
|
|
||||||
-- block size need to be 128 bits.
|
-- block size need to be 128 bits.
|
||||||
|
|||||||
1
QA.hs
1
QA.hs
@ -25,6 +25,7 @@ perModuleAllowedExtensions =
|
|||||||
, ("Crypto/Internal/Memory.hs", [MagicHash, UnboxedTuples])
|
, ("Crypto/Internal/Memory.hs", [MagicHash, UnboxedTuples])
|
||||||
, ("Crypto/Internal/Compat.hs", [CPP])
|
, ("Crypto/Internal/Compat.hs", [CPP])
|
||||||
, ("Crypto/Internal/CompatPrim.hs", [CPP,MagicHash])
|
, ("Crypto/Internal/CompatPrim.hs", [CPP,MagicHash])
|
||||||
|
, ("Crypto/Internal/Endian.hs", [CPP])
|
||||||
]
|
]
|
||||||
|
|
||||||
disallowedModules =
|
disallowedModules =
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user