diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2010-06-17 11:32:59 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2010-06-17 11:32:59 +0000 |
| commit | f6ee1f315a7e7069b21a993fb058e00d06b73487 (patch) | |
| tree | 097a54ea942baf4f2be8b21a23ef29fc8d8cb2e0 | |
| parent | 51b85031ce99f1e9d4c72249d6d85672188f0fbd (diff) | |
| download | haskell-f6ee1f315a7e7069b21a993fb058e00d06b73487.tar.gz | |
Make getAllocations() visible
| -rw-r--r-- | includes/rts/storage/GC.h | 7 | ||||
| -rw-r--r-- | rts/Stats.h | 2 |
2 files changed, 7 insertions, 2 deletions
diff --git a/includes/rts/storage/GC.h b/includes/rts/storage/GC.h index 5f2165f1fd..9616d72d51 100644 --- a/includes/rts/storage/GC.h +++ b/includes/rts/storage/GC.h @@ -175,6 +175,13 @@ void revertCAFs (void); void setKeepCAFs (void); /* ----------------------------------------------------------------------------- + Stats + -------------------------------------------------------------------------- */ + +// Returns the total number of bytes allocated since the start of the program. +HsInt64 getAllocations (void); + +/* ----------------------------------------------------------------------------- This is the write barrier for MUT_VARs, a.k.a. IORefs. A MUT_VAR_CLEAN object is not on the mutable list; a MUT_VAR_DIRTY is. When written to, a MUT_VAR_CLEAN turns into a MUT_VAR_DIRTY diff --git a/rts/Stats.h b/rts/Stats.h index d751761f02..f3a20ae6a2 100644 --- a/rts/Stats.h +++ b/rts/Stats.h @@ -61,8 +61,6 @@ Ticks stat_getElapsedTime(void); void statsPrintf( char *s, ... ) GNUC3_ATTRIBUTE(format (printf, 1, 2)); -HsInt64 getAllocations (void); - #include "EndPrivate.h" #endif /* STATS_H */ |