Skip to content

Instantly share code, notes, and snippets.

@kvanbere

kvanbere/.hs

Created December 15, 2017 10:28
Show Gist options
  • Save kvanbere/c40c3e11c5953af5d50fb6b97a9ee182 to your computer and use it in GitHub Desktop.
Save kvanbere/c40c3e11c5953af5d50fb6b97a9ee182 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
.hs
f :: Int -> Int
f x = x + x + x
f :: Int -> Int
f x = case x of { I# z -> I# (plus_Retn2 (plus_Retn2 z z) z) }
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment