Remove Crypto.Internal.Proxy

Data.Proxy can be used instead now that GHC >= 8.0.  In Data.Proxy the
Proxy type is poly-kinded.
This commit is contained in:
Olivier Chéron 2018-10-26 20:51:01 +02:00
parent 8c77f0c1ea
commit eccbc11824
5 changed files with 3 additions and 17 deletions

View File

@ -31,7 +31,6 @@ import qualified Crypto.ECC.Simple.Types as Simple
import qualified Crypto.ECC.Simple.Prim as Simple
import Crypto.Random
import Crypto.Error
import Crypto.Internal.Proxy
import Crypto.Internal.Imports
import Crypto.Internal.ByteArray (ByteArray, ByteArrayAccess, ScrubbedBytes)
import qualified Crypto.Internal.ByteArray as B
@ -41,6 +40,7 @@ import qualified Crypto.PubKey.Curve448 as X448
import Data.ByteArray (convert)
import Data.Data (Data())
import Data.Kind (Type)
import Data.Proxy
-- | An elliptic curve key pair composed of the private part (a scalar), and
-- the associated point.

View File

@ -17,7 +17,7 @@ module Crypto.ECC.Simple.Prim
) where
import Data.Maybe
import Crypto.Internal.Proxy
import Data.Proxy
import Crypto.Number.ModArithmetic
import Crypto.Number.F2m
import Crypto.Number.Generate (generateBetween)

View File

@ -1,13 +0,0 @@
-- |
-- Module : Crypto.Internal.Proxy
-- License : BSD-style
-- Maintainer : Vincent Hanquez <vincent@snarc.org>
-- Stability : experimental
-- Portability : Good
--
module Crypto.Internal.Proxy
( Proxy(..)
) where
-- | A type witness for 'a' as phantom type
data Proxy a = Proxy

View File

@ -14,8 +14,8 @@ module Crypto.Random.Entropy.Backend
) where
import Foreign.Ptr
import Data.Proxy
import Data.Word (Word8)
import Crypto.Internal.Proxy
import Crypto.Random.Entropy.Source
#ifdef SUPPORT_RDRAND
import Crypto.Random.Entropy.RDRand

View File

@ -220,7 +220,6 @@ Library
Crypto.PubKey.ElGamal
Crypto.ECC.Simple.Types
Crypto.ECC.Simple.Prim
Crypto.Internal.Proxy
Crypto.Internal.ByteArray
Crypto.Internal.Compat
Crypto.Internal.CompatPrim