summaryrefslogtreecommitdiff
path: root/rts/Trace.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2011-12-06 15:12:07 +0000
committerSimon Marlow <marlowsd@gmail.com>2011-12-06 16:00:27 +0000
commit92e7d6c92fdd14de424524564376d3522f2a40cc (patch)
tree5715d44012b452f5020ca14331a1fe50d5fd9600 /rts/Trace.c
parent8b75acd3ca25165536f18976c8d80cb62ad613e4 (diff)
downloadhaskell-92e7d6c92fdd14de424524564376d3522f2a40cc.tar.gz
Allow the number of capabilities to be increased at runtime (#3729)
At present the number of capabilities can only be *increased*, not decreased. The latter presents a few more challenges!
Diffstat (limited to 'rts/Trace.c')
-rw-r--r--rts/Trace.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/rts/Trace.c b/rts/Trace.c
index 1671bfeb36..df5147ca05 100644
--- a/rts/Trace.c
+++ b/rts/Trace.c
@@ -143,6 +143,13 @@ void resetTracing (void)
}
}
+void tracingAddCapapilities (nat from, nat to)
+{
+ if (eventlog_enabled) {
+ moreCapEventBufs(from,to);
+ }
+}
+
/* ---------------------------------------------------------------------------
Emitting trace messages/events
--------------------------------------------------------------------------- */