napkin-0.5.13
Safe HaskellNone
LanguageHaskell2010

Polysemy.Time

Synopsis

Documentation

runCurrentTimeIO :: forall effs m a. (Member (Embed m) effs, MonadIO m) => Sem (Time ': effs) a -> Sem effs a #

runCurrentTimeConst :: UTCTime -> Sem (Time ': effs) a -> Sem effs a #

time_ :: Member Time r => Sem r () -> Sem r NominalDiffTime #

Just measure how long action takes, discard its result