summaryrefslogtreecommitdiff
path: root/rts/RtsFlags.c
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2019-04-15 16:42:56 -0400
committerBen Gamari <ben@smart-cactus.org>2019-10-22 12:17:00 -0400
commit6f1731812331d4ddb4326fdfcefa095b867547e9 (patch)
treebc1fb4a5d0b41b98e50e38dcfea0c20748439ce6 /rts/RtsFlags.c
parent0d31819ed27f6763f5d253df0c1226d4c844e802 (diff)
downloadhaskell-6f1731812331d4ddb4326fdfcefa095b867547e9.tar.gz
NonmovingCensus: Emit samples to eventlogwip/gc/instrumentation
Diffstat (limited to 'rts/RtsFlags.c')
-rw-r--r--rts/RtsFlags.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c
index 7d486824ab..c606d86418 100644
--- a/rts/RtsFlags.c
+++ b/rts/RtsFlags.c
@@ -222,6 +222,7 @@ void initRtsFlagsDefaults(void)
RtsFlags.TraceFlags.timestamp = false;
RtsFlags.TraceFlags.scheduler = false;
RtsFlags.TraceFlags.gc = false;
+ RtsFlags.TraceFlags.nonmoving_gc = false;
RtsFlags.TraceFlags.sparks_sampled= false;
RtsFlags.TraceFlags.sparks_full = false;
RtsFlags.TraceFlags.user = false;
@@ -2131,6 +2132,10 @@ static void read_trace_flags(const char *arg)
RtsFlags.TraceFlags.gc = enabled;
enabled = true;
break;
+ case 'n':
+ RtsFlags.TraceFlags.nonmoving_gc = enabled;
+ enabled = true;
+ break;
case 'u':
RtsFlags.TraceFlags.user = enabled;
enabled = true;