From fab146594bcdfb504411c927db7595e07c180e49 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 12 May 2000 12:48:36 +0000
Subject: [PATCH 1/1] [project @ 2000-05-12 12:48:36 by simonmar] add some
 #ifdefery to suppress warnings.

---
 ghc/rts/ProfHeap.c |    6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/ghc/rts/ProfHeap.c b/ghc/rts/ProfHeap.c
index 9ef9a11..39eaa90 100644
--- a/ghc/rts/ProfHeap.c
+++ b/ghc/rts/ProfHeap.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: ProfHeap.c,v 1.12 2000/04/19 12:42:48 simonmar Exp $
+ * $Id: ProfHeap.c,v 1.13 2000/05/12 12:48:36 simonmar Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -50,6 +50,7 @@ static void fprint_data(FILE *fp);
  *
  * -------------------------------------------------------------------------- */
 
+#ifdef PROFILING
 typedef struct _ctr {
     const char *str;
     unsigned long mem_resid;
@@ -142,6 +143,7 @@ reportCtrResid(FILE *fp)
 	}
     }
 }
+#endif /* PROFILING */
 
 /* -------------------------------------------------------------------------- */
 
@@ -410,7 +412,7 @@ fprint_ccs(FILE *fp, CostCentreStack *ccs, nat components)
 
   } else {
     fprint_ccs(fp, ccs->prevStack,components-1);
-    fprintf(fp,"/%s",cc->label);
+    fprintf(fp,"/%s (%d)",cc->label,ccs->ccsID);
   }
 }
 
-- 
1.7.10.4