-import GHC.Exception ( block, unblock, throw, catchException )
-import GHC.IOBase ( IO, IORef, newIORef, readIORef, writeIORef, )
+import GHC.Exception ( throw )
+import GHC.IO ( IO, mask, catchAny )
+import GHC.IORef ( IORef, newIORef, readIORef, writeIORef )