Skip to content

Instantly share code, notes, and snippets.

@tsuraan

tsuraan/gist:1009162

Created June 5, 2011 17:07
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tsuraan/1009162 to your computer and use it in GitHub Desktop.
Save tsuraan/1009162 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
import Data.Word
import Criterion.Main
fi :: Word8 -> Word32
fi = fromIntegral
main = defaultMain [ bgroup "words" [ bench "noconvert" $ nf id (0 :: Word32)
, bench "convert" $ nf fi 0 ]]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment