diff options
| author |  Benjamin Barenblat <bbaren@google.com> | 2018-04-28 14:28:03 -0700 |
|---|---|---|
| committer | Benjamin Barenblat <bbaren@google.com> | 2018-04-28 14:28:03 -0700 |
| commit | 46f0b4f51ffa6982e66bdbf3a29426fb15c999d2 (patch) | |
| tree | 87914726af8bcb38a0071b3216459514b8e2fc17 /src/Data/Hmac.chs | |
| parent | 5418461764453d2a6fa0e66b56123ef541631689 (diff) | |
Begin refactoring low-level foreign imports into their own hierarchy
It’s clear at this point that this system is going to get large enough
that a two-layer implementation is warranted. `Internal` will contain
low-level bindings to BoringSSL; other modules will export an idiomatic
interface on top of them.
Diffstat (limited to 'src/Data/Hmac.chs')
| -rw-r--r-- | src/Data/Hmac.chs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Data/Hmac.chs b/src/Data/Hmac.chs index 907c352..e78c1af 100644 --- a/src/Data/Hmac.chs +++ b/src/Data/Hmac.chs @@ -33,10 +33,10 @@ import Foreign.Marshal.Unsafe (unsafeLocalState) import Unsafe.Coerce (unsafeCoerce) {#import Data.Digest.Internal#} - (Algorithm(Algorithm), Digest(Digest), Engine, EvpMd, evpMaxMdSize, - noEngine) + (Algorithm(Algorithm), Digest(Digest), evpMaxMdSize) import Foreign.Ptr.Cast (asVoidPtr) {#import Foreign.Ptr.ConstantTimeEquals#} (constantTimeEquals) +{#import Internal.Base#} import Result type LazyByteString = ByteString.Lazy.ByteString |