module Darcs.Util.Crypt.SHA256 ( sha256sum ) where import Prelude () import Darcs.Prelude import Crypto.Hash.SHA256 ( hash ) import Data.ByteString ( ByteString ) import Data.ByteString.Base16 ( encode ) import qualified Data.ByteString.Char8 as BC ( unpack ) sha256sum :: ByteString -> String sha256sum = BC.unpack . encode . hash