Add stage2/ghci to ghc-api's import list.
[ghc-hetmet.git] / ghc / misc / examples / io / io006 / Main.hs
1 import IO -- 1.3
2
3 main =
4     hClose stderr >>
5     hPutStr stderr "junk" `catch` \ err -> if isIllegalOperation err then putStr "Okay\n" else error "Not okay\n"
6