projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Move some make variables around so they are available when cleaning
[ghc-hetmet.git]
/
rts
/
Timer.c
diff --git
a/rts/Timer.c
b/rts/Timer.c
index
96ea5e2
..
dddc754
100644
(file)
--- a/
rts/Timer.c
+++ b/
rts/Timer.c
@@
-14,12
+14,13
@@
* on platform-specific services to install and run the timers.
*
*/
* on platform-specific services to install and run the timers.
*
*/
+
+#include "PosixSource.h"
#include "Rts.h"
#include "Rts.h"
-#include "RtsFlags.h"
+
+#include "Timer.h"
#include "Proftimer.h"
#include "Proftimer.h"
-#include "Storage.h"
#include "Schedule.h"
#include "Schedule.h"
-#include "Timer.h"
#include "Ticker.h"
#include "Capability.h"
#include "RtsSignals.h"
#include "Ticker.h"
#include "Capability.h"
#include "RtsSignals.h"
@@
-75,8
+76,6
@@
handle_tick(int unused STG_UNUSED)
ticks_to_gc = RtsFlags.GcFlags.idleGCDelayTime /
RtsFlags.MiscFlags.tickInterval;
recent_activity = ACTIVITY_INACTIVE;
ticks_to_gc = RtsFlags.GcFlags.idleGCDelayTime /
RtsFlags.MiscFlags.tickInterval;
recent_activity = ACTIVITY_INACTIVE;
- blackholes_need_checking = rtsTrue;
- /* hack: re-use the blackholes_need_checking flag */
wakeUpRts();
}
}
wakeUpRts();
}
}
@@
-113,9
+112,9
@@
stopTimer(void)
}
void
}
void
-exitTimer(void)
+exitTimer (rtsBool wait)
{
if (RtsFlags.MiscFlags.tickInterval != 0) {
{
if (RtsFlags.MiscFlags.tickInterval != 0) {
- exitTicker();
+ exitTicker(wait);
}
}
}
}