diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2011-08-23 16:07:22 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-08-25 11:12:32 +0100 |
| commit | 299d4645a54fc6083bf92034716ca225adce913e (patch) | |
| tree | 7d31d0687b4ad01b682a13976131c90ad33d3010 /compiler/codeGen/StgCmmLayout.hs | |
| parent | a61db80b86321474d819c9e43cd5066d39d465b9 (diff) | |
| download | haskell-299d4645a54fc6083bf92034716ca225adce913e.tar.gz | |
avoid record selector error on closureProf
Diffstat (limited to 'compiler/codeGen/StgCmmLayout.hs')
| -rw-r--r-- | compiler/codeGen/StgCmmLayout.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/codeGen/StgCmmLayout.hs b/compiler/codeGen/StgCmmLayout.hs index c7156fa887..953aa1cdd2 100644 --- a/compiler/codeGen/StgCmmLayout.hs +++ b/compiler/codeGen/StgCmmLayout.hs @@ -405,7 +405,7 @@ mkCmmInfo :: ClosureInfo -> CmmInfoTable mkCmmInfo cl_info = CmmInfoTable { cit_lbl = infoTableLabelFromCI cl_info, cit_rep = closureSMRep cl_info, - cit_prof = closureProf cl_info, + cit_prof = clProfInfo cl_info, cit_srt = closureSRT cl_info } ----------------------------------------------------------------------------- |