Fix #249 (-caf-all bugs)
authorSimon Marlow <simonmar@microsoft.com>
Wed, 28 Feb 2007 15:50:09 +0000 (15:50 +0000)
committerSimon Marlow <simonmar@microsoft.com>
Wed, 28 Feb 2007 15:50:09 +0000 (15:50 +0000)
commite07e2550074ddc7d96e2092e56add418403bd29a
treeb3017d2d151644f020d8b83e01864baf236dc50e
parentdce3fd4efcb90f61b115a400559ef687a11f2c53
Fix #249 (-caf-all bugs)
There were two bugs:
 * we were generating the symbol name for the CAF
   cost centre from the OccName, which isn't unique enough
   in the case of system-generated non-external names
 * :Main.main caused problems, because we were assuming that
   every top-level CAF was from the current module.
compiler/profiling/CostCentre.lhs
compiler/profiling/SCCfinal.lhs