diff options
| author | Duncan Coutts <duncan@well-typed.com> | 2011-05-23 00:10:21 +0100 |
|---|---|---|
| committer | Duncan Coutts <duncan@well-typed.com> | 2011-05-23 00:10:21 +0100 |
| commit | 96d64fe2175d829f9499656750d51cf577ff9892 (patch) | |
| tree | d2f784f6086b830d7429e1b77904f5e500e4e95d /rts/Capability.c | |
| parent | e7dcbdc7b68275d23debfec5f17074c55212eeb1 (diff) | |
| download | haskell-96d64fe2175d829f9499656750d51cf577ff9892.tar.gz | |
Revert "Add capability sets to the event system. Contains code from Duncan Coutts."
This reverts commit 58532eb46041aec8d4cbb48b054cb5b001edb43c.
Turns out it didn't work on Windows and it'll need some non-trivial changes
to make it work on Windows. We'll get it in later once that's sorted out.
Diffstat (limited to 'rts/Capability.c')
| -rw-r--r-- | rts/Capability.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/rts/Capability.c b/rts/Capability.c index 9557fcc07f..9091fdde0c 100644 --- a/rts/Capability.c +++ b/rts/Capability.c @@ -253,8 +253,6 @@ initCapability( Capability *cap, nat i ) cap->transaction_tokens = 0; cap->context_switch = 0; cap->pinned_object_block = NULL; - - traceCapsetAssignCap(CAPSET_OSPROCESS_DEFAULT, i); } /* --------------------------------------------------------------------------- @@ -268,7 +266,6 @@ initCapability( Capability *cap, nat i ) void initCapabilities( void ) { - #if defined(THREADED_RTS) nat i; @@ -836,7 +833,6 @@ freeCapabilities (void) #else freeCapability(&MainCapability); #endif - traceCapsetDelete(CAPSET_OSPROCESS_DEFAULT); } /* --------------------------------------------------------------------------- |