diff options
| author | Andreas Voellmy <andreas.voellmy@gmail.com> | 2012-12-20 00:43:11 -0500 |
|---|---|---|
| committer | Johan Tibell <johan.tibell@gmail.com> | 2013-02-11 21:38:36 -0800 |
| commit | 38a5902fec5ca7b078f607cc4e7452f1c62214f7 (patch) | |
| tree | 67220998c4706c9c78a26258fd60a7fa9840ba97 /rts/Globals.c | |
| parent | 7b098b6009727a012cb1f3ff0ca51698d302cae1 (diff) | |
| download | haskell-38a5902fec5ca7b078f607cc4e7452f1c62214f7.tar.gz | |
Added RTS hooks for the timer manager.
Diffstat (limited to 'rts/Globals.c')
| -rw-r--r-- | rts/Globals.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/rts/Globals.c b/rts/Globals.c index 06b2f9721f..1aafe21879 100644 --- a/rts/Globals.c +++ b/rts/Globals.c @@ -25,6 +25,8 @@ typedef enum { GHCConcWindowsProddingStore, SystemEventThreadEventManagerStore, SystemEventThreadIOManagerThreadStore, + SystemTimerThreadEventManagerStore, + SystemTimerThreadIOManagerThreadStore, MaxStoreKey } StoreKey; @@ -114,3 +116,15 @@ getOrSetSystemEventThreadIOManagerThreadStore(StgStablePtr ptr) { return getOrSetKey(SystemEventThreadIOManagerThreadStore,ptr); } + +StgStablePtr +getOrSetSystemTimerThreadEventManagerStore(StgStablePtr ptr) +{ + return getOrSetKey(SystemTimerThreadEventManagerStore,ptr); +} + +StgStablePtr +getOrSetSystemTimerThreadIOManagerThreadStore(StgStablePtr ptr) +{ + return getOrSetKey(SystemTimerThreadIOManagerThreadStore,ptr); +} |