
8 Apr
2010
8 Apr
'10
2:39 p.m.
Bas van Dijk
It looks like your timedIterateIO is too lazy.
Try evaluating the 'y' before calling timedIterateIO' again as in:
let y = f x ... y `seq` timedIterateIO' t0 y
Thank you, that appears to do the trick. I'm still a bit puzzled about why the problem only manifested in this case - it didn't manifest when I used iterate, for example.