diff options
| author | simonmar <unknown> | 1999-09-15 13:45:20 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 1999-09-15 13:45:20 +0000 |
| commit | 17315bf6c11c17ad38ca5a65d7e938ac32d07d8a (patch) | |
| tree | e782707e7c85c0f4361fb1095aeda8494d7e29db /ghc/includes/StgProf.h | |
| parent | 18e952cfcc7aab9d38d66e781183d5aadae38ff0 (diff) | |
| download | haskell-17315bf6c11c17ad38ca5a65d7e938ac32d07d8a.tar.gz | |
[project @ 1999-09-15 13:45:14 by simonmar]
Heap Profiling
--------------
This commit adds simple hp2ps-style heap profiling. Just the '-h'
option is supported so far.
Heap profiles will show the top two cost centres on each cost centre
stack.
Time/Alloc profiles have been extended to aggregate the costs on a
per-cost-centre basis and show the table of highest consuming cost
centres before the full table of cost centre stacks.
Profiles work best if '-caf-all' is used, especially when using
one of the '-auto' flags.
Diffstat (limited to 'ghc/includes/StgProf.h')
| -rw-r--r-- | ghc/includes/StgProf.h | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/ghc/includes/StgProf.h b/ghc/includes/StgProf.h index ebd1735b40..0f71fec47c 100644 --- a/ghc/includes/StgProf.h +++ b/ghc/includes/StgProf.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: StgProf.h,v 1.6 1999/04/23 09:47:31 simonm Exp $ + * $Id: StgProf.h,v 1.7 1999/09/15 13:45:14 simonmar Exp $ * * (c) The GHC Team, 1998 * @@ -87,10 +87,12 @@ extern CostCentreStack *CCS_LIST; /* registered CCS list */ # define CC_DECLARE(cc_ident,name,module,group,subsumed,is_local) \ is_local CostCentre cc_ident[1] \ = {{ 0, \ - name, \ - module, \ + name, \ + module, \ group, \ - subsumed, \ + 0, \ + 0, \ + subsumed, \ 0 }}; # define CCS_DECLARE(ccs_ident,cc_ident,subsumed,is_local) \ @@ -104,6 +106,7 @@ extern CostCentreStack *CCS_LIST; /* registered CCS list */ sub_cafcc_count : 0, \ time_ticks : 0, \ mem_alloc : 0, \ + mem_resid : 0, \ root : 0, \ }}; |