summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2021-10-11 18:13:32 -0400
committerBen Gamari <ben@smart-cactus.org>2022-08-06 11:45:17 -0400
commitd2e4e123d69a18e52b569cdb61946b2e7f30ec1e (patch)
treec856ddec32f21c102c1c25d6d6a3d1b8245ae557
parentc0348865ff8b9100a8ec54be03e375c3dddc8900 (diff)
downloadhaskell-d2e4e123d69a18e52b569cdb61946b2e7f30ec1e.tar.gz
rts: Fix code style
-rw-r--r--rts/Threads.c28
1 files changed, 14 insertions, 14 deletions
diff --git a/rts/Threads.c b/rts/Threads.c
index fdd7eeadf0..af1758f2ef 100644
--- a/rts/Threads.c
+++ b/rts/Threads.c
@@ -925,20 +925,20 @@ printThreadStatus(StgTSO *t)
void *label = lookupThreadLabel(t->id);
if (label) debugBelch("[\"%s\"] ",(char *)label);
}
- switch (t->what_next) {
- case ThreadKilled:
- debugBelch("has been killed");
- break;
- case ThreadComplete:
- debugBelch("has completed");
- break;
- default:
- printThreadBlockage(t);
- }
- if (t->dirty) {
- debugBelch(" (TSO_DIRTY)");
- }
- debugBelch("\n");
+ switch (t->what_next) {
+ case ThreadKilled:
+ debugBelch("has been killed");
+ break;
+ case ThreadComplete:
+ debugBelch("has completed");
+ break;
+ default:
+ printThreadBlockage(t);
+ }
+ if (t->dirty) {
+ debugBelch(" (TSO_DIRTY)");
+ }
+ debugBelch("\n");
}
void