On 12-11-12 11:34 AM, Simon Marlow wrote:
Did you try -fpedantic-bottoms?
Interesting option. And furthermore its doc refers to -fno-state-hack, too.
import Control.DeepSeq
import Control.Exception
main = do
evaluate (('a' : error "A") `deepseq` putStrLn "hi")
throwIO (userError "B")
-O -fpedantic-bottoms => B
-O -fno-state-hack => A
-O both => A
7.4.2, linux 32-bit x86
_______________________________________________
Glasgow-haskell-users mailing list
Glasgow-haskell-users@haskell.org
http://www.haskell.org/mailman/listinfo/glasgow-haskell-users
