Commit cbb4515e authored by simonmar's avatar simonmar
Browse files

[project @ 2001-11-27 15:30:06 by simonmar]

Don't forget about the "MANY" retainer set when dumping a retainer profile.
parent bfc15d89
/* -----------------------------------------------------------------------------
* $Id: ProfHeap.c,v 1.27 2001/11/26 16:54:21 simonmar Exp $
* $Id: ProfHeap.c,v 1.28 2001/11/27 15:30:06 simonmar Exp $
*
* (c) The GHC Team, 1998-2000
*
......@@ -549,6 +549,12 @@ dumpCensus( Census *census )
{
RetainerSet *rs = (RetainerSet *)ctr->identity;
// it might be the distinguished retainer set rs_MANY:
if (rs == &rs_MANY) {
fprintf(hp_file, "MANY");
break;
}
// Mark this retainer set by negating its id, because it
// has appeared in at least one census. We print the
// values of all such retainer sets into the log file at
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment