1 2 3 4 5 6 7 8
module Main( main ) where main :: IO () main = seq (error "hello world!" :: Int) (return ())