/* -----------------------------------------------------------------------------
- * $Id: Profiling.c,v 1.17 2000/04/03 15:54:49 simonmar Exp $
+ * $Id: Profiling.c,v 1.18 2000/04/05 15:21:28 simonmar Exp $
*
* (c) The GHC Team, 1998-2000
*
CostCentre *cc;
IndexTable *i;
+ if (ccs_to_ignore(ccs)) { return; }
+
cc = ccs->cc;
fprintf(prof_file, " 1 %d %lu %lu %lu",