1 2 3 4 5 6 7 8 9
{-# LANGUAGE Unsafe #-} {-# LANGUAGE NoImplicitPrelude #-} module GHC.IO where import GHC.Types failIO :: [Char] -> IO a mplusIO :: IO a -> IO a -> IO a