Skein512.hs

-- |
-- Module      : Data.CryptoHash.Skein512
-- License     : BSD-style
-- Maintainer  : Vincent Hanquez <vincent@snarc.org>
-- Stability   : experimental
-- Portability : unknown
--
-- compatibility module for Skein512. use Crypto.Hash.Skein512 instead.
--
module Data.CryptoHash.Skein512 (
	Ctx(..),

	-- * Incremental hashing Functions
	init,      -- :: Int -> Ctx
	update,    -- :: Ctx -> ByteString -> Ctx
	finalize,  -- :: Ctx -> ByteString

	-- * Single Pass hashing
	hash,      -- :: Int -> ByteString -> ByteString
	hashlazy   -- :: Int -> ByteString -> ByteString
	) where

import Prelude (Int)
import Crypto.Hash.Skein512 (Ctx(..))
import qualified Crypto.Hash.Skein512 as R
import Data.ByteString (ByteString)
import qualified Data.ByteString.Lazy as L (ByteString)

{-# DEPRECATED init "use crypto.hash.Skein512" #-}
init :: Int -> Ctx
init = R.init

{-# DEPRECATED update "use crypto.hash.Skein512" #-}
update :: Ctx -> ByteString -> Ctx
update = R.update

{-# DEPRECATED finalize "use crypto.hash.Skein512" #-}
finalize :: Ctx -> ByteString
finalize = R.finalize

{-# DEPRECATED hash "use crypto.hash.Skein512" #-}
hash :: Int -> ByteString -> ByteString
hash = R.hash

{-# DEPRECATED hashlazy "use crypto.hash.Skein512" #-}
hashlazy :: Int -> L.ByteString -> ByteString
hashlazy = R.hashlazy