Skip to content

Instantly share code, notes, and snippets.

@iand675

iand675/gist:ae489ed97cba90ade42b

Created August 23, 2014 01:29
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save iand675/ae489ed97cba90ade42b to your computer and use it in GitHub Desktop.
Save iand675/ae489ed97cba90ade42b to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.hs
-- | 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