Skip to content
This repository was archived by the owner on Jan 17, 2020. It is now read-only.

Commit f44797c

Browse files
committed
remove unsafe instance for MonadIO
1 parent bb69b01 commit f44797c

File tree

1 file changed

+0
-6
lines changed

1 file changed

+0
-6
lines changed

src/Control/Monad/IO/Class.purs

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,16 +1,10 @@
11
module Control.Monad.IO.Class where
22
import Control.Category (id)
33
import Control.Monad (class Monad)
4-
import Control.Monad.Aff (Aff)
54
import Control.Monad.IO (IO)
65

7-
import Unsafe.Coerce (unsafeCoerce)
8-
96
class Monad m <= MonadIO m where
107
liftIO :: forall a. IO a -> m a
118

129
instance monadIOIO :: MonadIO IO where
1310
liftIO = id
14-
15-
instance monadIOAff :: MonadIO (Aff e) where
16-
liftIO = unsafeCoerce

0 commit comments

Comments
 (0)