projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[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
4e1bcc1
..
344b657
100644
(file)
--- a/
ghc/includes/RtsFlags.h
+++ b/
ghc/includes/RtsFlags.h
@@
-1,5
+1,5
@@
/* -----------------------------------------------------------------------------
/* -----------------------------------------------------------------------------
- * $Id: RtsFlags.h,v 1.37 2001/08/08 14:14:09 simonmar Exp $
+ * $Id: RtsFlags.h,v 1.40 2001/11/26 16:54:22 simonmar Exp $
*
* (c) The GHC Team, 1998-1999
*
*
* (c) The GHC Team, 1998-1999
*
@@
-69,7
+69,7
@@
struct DEBUG_FLAGS {
rtsBool linker : 1; /* 4096 */
};
rtsBool linker : 1; /* 4096 */
};
-#define MAX_DEBUG_OPTION 12
+#define MAX_DEBUG_OPTION 13
#define DEBUG_MASK(n) ((nat)(ldexp(1,n)))
#define MAX_DEBUG_MASK ((nat)(ldexp(1,(MAX_DEBUG_OPTION+1))-1))
#define DEBUG_MASK(n) ((nat)(ldexp(1,n)))
#define MAX_DEBUG_MASK ((nat)(ldexp(1,(MAX_DEBUG_OPTION+1))-1))
@@
-88,8
+88,8
@@
struct COST_CENTRE_FLAGS {
struct PROFILING_FLAGS {
unsigned int doHeapProfile;
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 */
# 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_MOD 2
# define HEAP_BY_DESCR 4
# define HEAP_BY_TYPE 5
+# define HEAP_BY_RETAINER 6
+# define HEAP_BY_LDV 7
rtsBool showCCSOnException;
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* modSelector;
char* descrSelector;
char* typeSelector;
char* ccSelector;
-
+ char* retainerSelector;
+ char* bioSelector;
};
#elif defined(DEBUG)
};
#elif defined(DEBUG)