From: sof <unknown>
Date: Sun, 25 Nov 2001 16:57:38 +0000 (+0000)
Subject: [project @ 2001-11-25 16:57:38 by sof]
X-Git-Tag: Approximately_9120_patches~530
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=a412def3679e76a01e99a8a04d6ee893f140a470;p=ghc-hetmet.git

[project @ 2001-11-25 16:57:38 by sof]
Retainer/LDV changes.

The recent prof-related commit forgot to include RtsFlags.h, methinks.
But, modulo trivia, I'm reasonably sure that this commit mirrors
whatever mods that unchecked-in file contains.
---

diff --git a/ghc/includes/RtsFlags.h b/ghc/includes/RtsFlags.h
index 09c77a0..301743a 100644
--- 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.39 2001/11/25 16:57:38 sof 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,6 +97,9 @@ struct PROFILING_FLAGS {
 # define HEAP_BY_MOD		2
 # define HEAP_BY_DESCR		4
 # define HEAP_BY_TYPE		5
+/* Flags for retainer and lag-drag-void profiling */
+# define HEAP_BY_RETAINER       6
+# define HEAP_BY_LDV            7
 
     rtsBool		showCCSOnException;