diff options
author | Benjamin Barenblat <bbaren@google.com> | 2018-08-02 17:00:22 -0400 |
---|---|---|
committer | Benjamin Barenblat <bbaren@google.com> | 2018-08-02 17:00:22 -0400 |
commit | 5214c3f61d3aaaf18baff8020a066cc2160d612d (patch) | |
tree | f99b7251b8d48c6a560778e50aa8c1f9e4122038 /src/Types.hs | |
parent | a70d7fa4a478753e0ab765fb05559e1769760232 (diff) |
Codec.Crypto.HKDF: Implement `expand`
Diffstat (limited to 'src/Types.hs')
-rw-r--r-- | src/Types.hs | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/Types.hs b/src/Types.hs index 6b430c2..3c0f350 100644 --- a/src/Types.hs +++ b/src/Types.hs @@ -13,13 +13,19 @@ -- the License. module Types - ( Salt(Salt), noSalt + ( AssociatedData(AssociatedData) + , Salt(Salt), noSalt , SecretKey(SecretKey) ) where import Data.ByteString (ByteString) import qualified Data.ByteString as ByteString +-- | Context or application-specific information. Equality comparisons on this +-- type are variable-time. +newtype AssociatedData = AssociatedData ByteString + deriving (Eq, Ord, Show) + -- | A salt. Equality comparisons on this type are variable-time. newtype Salt = Salt ByteString deriving (Eq, Ord, Show) |