[Haskell] Non-drifting clock, anyone?

[ihope]

Here it is, in all its greatly untested glory: http://pastebin.ca/109242

I don't know how much error it has, but the error won't stack up: if
it's one second off, it will remain one second off until the end of
time, or until your system clock drifts. But system clock drifts will
be fixed by synchronizing your system clock with the outside world,
except that if your clock jumps forward, this one will suddenly tick
like mad, and if it jumps backward, this one will stop for a while...
oh well.