Add Control.Exception.blocked :: IO Bool