diff options
author | Ben Gamari <ben@smart-cactus.org> | 2021-10-11 18:13:32 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2022-08-06 11:45:17 -0400 |
commit | d2e4e123d69a18e52b569cdb61946b2e7f30ec1e (patch) | |
tree | c856ddec32f21c102c1c25d6d6a3d1b8245ae557 | |
parent | c0348865ff8b9100a8ec54be03e375c3dddc8900 (diff) | |
download | haskell-d2e4e123d69a18e52b569cdb61946b2e7f30ec1e.tar.gz |
rts: Fix code style
-rw-r--r-- | rts/Threads.c | 28 |
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 |