fixing comment.

This commit is contained in:
Kazu Yamamoto 2014-05-08 16:51:15 +09:00
parent 8f091b4f70
commit cc3e728f03

View File

@ -63,7 +63,7 @@ newtype GhcMod a = GhcMod {
#if __GLASGOW_HASKELL__ < 708
instance (Monoid w, MonadIO m) => MonadIO (RWST r w s m) where
-- liftIO :: MonadIO m => m -> IO m
-- liftIO :: MonadIO m => IO a -> m a
liftIO = lift . liftIO
#endif