diff options
| author | simonmar <unknown> | 2005-03-17 12:45:09 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2005-03-17 12:45:09 +0000 |
| commit | b8ced282cd2a56e47f628bc760980bb7b9f25d9a (patch) | |
| tree | 4626b0fe2bb24cf7f46f182d4faeb58b17d3189a /ghc/compiler/codeGen | |
| parent | fdda641e2c25903d2b92364f976badc599a1b759 (diff) | |
| download | haskell-b8ced282cd2a56e47f628bc760980bb7b9f25d9a.tar.gz | |
[project @ 2005-03-17 12:45:08 by simonmar]
Rearrange the fields of CostCentreStack to leave no (or less) room for
arbitrary padding decisions by C compilers.
Diffstat (limited to 'ghc/compiler/codeGen')
| -rw-r--r-- | ghc/compiler/codeGen/CgProf.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/compiler/codeGen/CgProf.hs b/ghc/compiler/codeGen/CgProf.hs index 5177072bf6..844f1d75d2 100644 --- a/ghc/compiler/codeGen/CgProf.hs +++ b/ghc/compiler/codeGen/CgProf.hs @@ -316,12 +316,12 @@ emitCostCentreStackDecl ccs mkCCostCentre cc, zero, -- struct _CostCentreStack *prevStack; zero, -- struct _IndexTable *indexTable; - zero, -- StgWord selected; zero64, -- StgWord64 scc_count; + zero, -- StgWord selected; zero, -- StgWord time_ticks; zero64, -- StgWord64 mem_alloc; - zero, -- StgWord inherited_ticks; zero64, -- StgWord64 inherited_alloc; + zero, -- StgWord inherited_ticks; zero -- CostCentre *root; ] ; emitDataLits (mkCCSLabel ccs) lits |