> timer f a = do
> t1 <- get current time
> evaluate (f a)
> t2 <- get current time
> return (different in t2 and t1)
>
> where evaluate is from Control.Exception. could someone tell me how
> evaluate compares to seq and deepSeq?
The documentation explains the difference, but it's a bit
This is in part an answer, in part a question. If 'b' is a "simple
value", then somethign like:
timer f a = do
t1 <- get current time
t2 <- f a `seq` get current time
return (different in t2 and t1)
(my memory of Time fails right now, so fill in the proper functions.)
perhaps safer is to