Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
-- | A measure of time statistics for the duration of an event
data Timer m = Timer
{ fromTimer :: !(MutVar (PrimState m) P.Timer)
, _timerGetTime :: !(m NominalDiffTime)
makeFields ''Timer
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment