1 2 3 4 5 6 7 8 9
{-# LANGUAGE MagicHash #-} module StrictBinds where import GHC.Exts foo = let x = 3# +# y y = x in True