diff options
author | Simon Marlow <simonmar@microsoft.com> | 2007-06-27 09:29:41 +0000 |
---|---|---|
committer | Simon Marlow <simonmar@microsoft.com> | 2007-06-27 09:29:41 +0000 |
commit | e1ddf51abb3a89392cc9da9a36b74f0d69f9a36b (patch) | |
tree | d68b621327b0251460f0123a254c6a18f2864a32 /rts/Timer.c | |
parent | 65ff44face84ae30f1ddf7d009d51c1778f8c7d3 (diff) | |
download | haskell-e1ddf51abb3a89392cc9da9a36b74f0d69f9a36b.tar.gz |
+RTS -V0 disables the interval timer completely (for repeatable debugging)
Diffstat (limited to 'rts/Timer.c')
-rw-r--r-- | rts/Timer.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/rts/Timer.c b/rts/Timer.c index 05d1fecdc7..0e0b5386b7 100644 --- a/rts/Timer.c +++ b/rts/Timer.c @@ -85,7 +85,9 @@ void startTimer(void) { initProfTimer(); - startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick); + if (RtsFlags.MiscFlags.tickInterval != 0) { + startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick); + } } void |