Hannes Siebenhandl pushed to branch wip/fendor/hpc-bc-support at Glasgow Haskell Compiler / GHC

Commits:

1 changed file:

Changes:

  • compiler/GHC/HsToCore/Coverage.hs
    ... ... @@ -158,4 +158,4 @@ mkHpcTickLabel platform mod =
    158 158
     
    
    159 159
     mkHpcModuleLabel :: Module -> String
    
    160 160
     mkHpcModuleLabel mod =
    
    161
    -  showSDocOneLine defaultSDocContext (pprCode $ ppr mod)
    161
    +  showSDocOneLine defaultSDocContext (pprCode $ hpcModuleName mod)