diff options
| author | Andreas Klebinger <klebinger.andreas@gmx.at> | 2021-08-26 12:40:09 +0200 |
|---|---|---|
| committer | Andreas Klebinger <klebinger.andreas@gmx.at> | 2021-08-26 12:40:09 +0200 |
| commit | 22fb122b4c8c310b14abefbb27222f8e8b2e91db (patch) | |
| tree | ee6e20785be9ef771eed1d8ad207b49c6b1efc71 | |
| parent | d45b55c1c013f497a6cc070618960c67bf284686 (diff) | |
| download | haskell-wip/andreask/no_hp_gen.tar.gz | |
Fixing braceswip/andreask/no_hp_gen
| -rw-r--r-- | rts/ProfHeap.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/rts/ProfHeap.c b/rts/ProfHeap.c index 940d5e4ae9..91880df305 100644 --- a/rts/ProfHeap.c +++ b/rts/ProfHeap.c @@ -951,9 +951,10 @@ dumpCensus( Census *census ) // it might be the distinguished retainer set rs_MANY: if(RtsFlags.ProfFlags.generateHpFile) { - if (rs == &rs_MANY) { - fprintf(hp_file, "MANY"); - break; + if (rs == &rs_MANY) { + fprintf(hp_file, "MANY"); + break; + } } // Mark this retainer set by negating its id, because it |