On Wed, Jun 20, 2007 at 01:24:00PM +1000, Donald Bruce Stewart wrote: > aeyakovenko: > > $ time ./md5sum ./md5sum > > [105,252,52,138,187,192,216,17,225,123,185,3,124,101,86,132] > > > > real 0m4.790s > > user 0m3.688s > > sys 0m0.492s > > > > $ time md5sum ./md5sum > > 69fc348abbc0d811e17bb9037c655684 ./md5sum > > > > real 0m0.023s > > user 0m0.000s > > sys 0m0.008s > > > > this is my implementation using crypto > > (http://www.haskell.org/crypto/). Am I doing something wrong? > > > > module Main where > > > > import System > > import qualified Data.Digest.MD5 as MD5 > > import qualified Data.ByteString as BS > > > > main = do > > args <- getArgs > > dt <- BS.readFile $ head args > > putStrLn $ show $ MD5.hash . BS.unpack $ dt > ^^^^ ^^^^^^^^^ > > not a good idea. > > You need an MD5 over bytestrings, not [Word8].
Wouldn't deforestation have produced something within a factor of 4-ish of optimal? Stefan _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
