[project @ 2001-11-26 16:54:21 by simonmar]

[ghc-hetmet.git] / ghc / includes / RtsFlags.h

diff --git a/ghc/includes/RtsFlags.h b/ghc/includes/RtsFlags.h
index 09c77a0..344b657 100644 (file)
--- a/ghc/includes/RtsFlags.h
+++ b/ghc/includes/RtsFlags.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: RtsFlags.h,v 1.38 2001/08/31 11:42:44 sewardj Exp $
+ * $Id: RtsFlags.h,v 1.40 2001/11/26 16:54:22 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -88,8 +88,8 @@ struct COST_CENTRE_FLAGS {
 struct PROFILING_FLAGS {
     unsigned int       doHeapProfile;
 
-    nat                 profileFrequency;  /* how often do you want */
-                                           /* to sample (in ms) */
+    nat                 profileInterval;      /* delta between samples (in ms) */
+    nat                 profileIntervalTicks; /* delta between samples (in 'ticks') */
 
 
 # define NO_HEAP_PROFILING     0       /* N.B. Used as indexes into arrays */
@@ -97,19 +97,19 @@ struct PROFILING_FLAGS {
 # define HEAP_BY_MOD           2
 # define HEAP_BY_DESCR         4
 # define HEAP_BY_TYPE          5
+# define HEAP_BY_RETAINER       6
+# define HEAP_BY_LDV            7
 
     rtsBool            showCCSOnException;
   
-# define CCchar    'C'
-# define MODchar   'M'
-# define DESCRchar 'D'
-# define TYPEchar  'Y'
+    nat                 maxRetainerSetSize;
 
     char*               modSelector;
     char*               descrSelector;
     char*               typeSelector;
     char*               ccSelector;
-
+    char*               retainerSelector;
+    char*               bioSelector;
 
 };
 #elif defined(DEBUG)