/* -----------------------------------------------------------------------------
- * $Id: RtsFlags.h,v 1.11 1999/03/03 19:20:41 sof Exp $
+ * $Id: RtsFlags.h,v 1.14 1999/06/25 09:18:49 simonmar Exp $
*
* (c) The GHC Team, 1998-1999
*
struct GC_FLAGS {
FILE *statsFile;
- nat giveStats; /* ToDo: replace with enum type? */
+ nat giveStats;
#define NO_GC_STATS 0
-#define VERBOSE_GC_STATS 1
+#define SUMMARY_GC_STATS 1
+#define VERBOSE_GC_STATS 2
nat maxStkSize; /* in *words* */
nat initialStkSize; /* in *words* */
rtsBool sanity : 1; /* 128 */
rtsBool stable : 1; /* 256 */
+ rtsBool prof : 1; /* 512 */
};
#if defined(PROFILING) || defined(PAR)
struct TICKY_FLAGS {
rtsBool showTickyStats;
FILE *tickyFile;
-
- /* see also: doUpdEntryCounts in AllFlags */
};
#endif /* TICKY_TICKY */