From 955f010bffafa69795dbfeebd84da73ac7763035 Mon Sep 17 00:00:00 2001 From: Vincent Hanquez Date: Fri, 2 Dec 2016 15:00:05 +0000 Subject: [PATCH] add internal proxy type to create witnesses --- Crypto/Internal/Proxy.hs | 13 +++++++++++++ cryptonite.cabal | 1 + 2 files changed, 14 insertions(+) create mode 100644 Crypto/Internal/Proxy.hs diff --git a/Crypto/Internal/Proxy.hs b/Crypto/Internal/Proxy.hs new file mode 100644 index 0000000..1873b2b --- /dev/null +++ b/Crypto/Internal/Proxy.hs @@ -0,0 +1,13 @@ +-- | +-- Module : Crypto.Internal.Proxy +-- License : BSD-style +-- Maintainer : Vincent Hanquez +-- Stability : experimental +-- Portability : Good +-- +module Crypto.Internal.Proxy + ( Proxy(..) + ) where + +-- | A type witness for 'a' as phantom type +data Proxy a = Proxy diff --git a/cryptonite.cabal b/cryptonite.cabal index ce81c31..ac83d56 100644 --- a/cryptonite.cabal +++ b/cryptonite.cabal @@ -188,6 +188,7 @@ Library Crypto.PubKey.ElGamal Crypto.ECC.Simple.Types Crypto.ECC.Simple.Prim + Crypto.Internal.Proxy Crypto.Internal.ByteArray Crypto.Internal.Compat Crypto.Internal.CompatPrim