hashing-0.1.0.1: app/Main.hs

module Main where

import qualified Data.ByteString.Lazy as LBS
import           Data.ByteString (ByteString)
import           Crypto.Hash

main :: IO ()
main = LBS.getContents >>= print . (hashLazy :: LBS.ByteString -> Whirlpool)