git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Change Logger datatype into a newtype.
8c7cc69(cdep)illabout
src/Control/Monad/Logger.hs+1−1
@@ -30,7 +30,7 @@ import Control.Monad.Base (MonadBase(..))
30import Control.Monad.Trans.Control (MonadBaseControl(..))
30import Control.Monad.Trans.Control (MonadBaseControl(..))
31
31
32-- | A replacement for WriterT IO which uses mutable references.
32-- | A replacement for WriterT IO which uses mutable references.
33−data Logger w a = Logger { runLogger :: IORef w -> IO a }
33+newtype Logger w a = Logger { runLogger :: IORef w -> IO a }
34
34
35-- | Run a Logger computation, starting with an empty log.
35-- | Run a Logger computation, starting with an empty log.
36runLogger' :: (Monoid w) => Logger w a -> IO (a, w)
36runLogger' :: (Monoid w) => Logger w a -> IO (a, w)