-- |
-- Module      : Network.TLS.Cap
-- License     : BSD-style
-- Maintainer  : Vincent Hanquez <vincent@snarc.org>
-- Stability   : experimental
-- Portability : unknown
--

module Network.TLS.Cap
    ( hasHelloExtensions
    , hasExplicitBlockIV
    ) where

import Network.TLS.Types

hasHelloExtensions, hasExplicitBlockIV :: Version -> Bool

hasHelloExtensions :: Version -> Bool
hasHelloExtensions Version
ver = Version
ver forall a. Ord a => a -> a -> Bool
>= Version
SSL3
hasExplicitBlockIV :: Version -> Bool
hasExplicitBlockIV Version
ver = Version
ver forall a. Ord a => a -> a -> Bool
>= Version
TLS11