diff options
author | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2022-10-25 21:20:37 +0200 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-10-28 00:50:00 -0400 |
commit | ad612f555821a44260e5d9654f940b71f5180817 (patch) | |
tree | c5601914b79e3d3872ce0e4844d6910cfd00ab43 /compiler/GHC/HsToCore | |
parent | 750846cd2c51613d2bbd0029a304d07fae2c2972 (diff) | |
download | haskell-ad612f555821a44260e5d9654f940b71f5180817.tar.gz |
Minor SDoc-related cleanup
* Rename pprCLabel to pprCLabelStyle, and use the name pprCLabel
for a function using CStyle (analogous to pprAsmLabel)
* Move LabelStyle to the CLabel module, it no longer needs to be in Outputable.
* Move calls to 'text' right next to literals, to make sure the text/str
rule is triggered.
* Remove FastString/String roundtrip in Tc.Deriv.Generate
* Introduce showSDocForUser', which abstracts over a pattern in
GHCi.UI
Diffstat (limited to 'compiler/GHC/HsToCore')
-rw-r--r-- | compiler/GHC/HsToCore/Coverage.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/HsToCore/Coverage.hs b/compiler/GHC/HsToCore/Coverage.hs index cec5a581de..9e2619db65 100644 --- a/compiler/GHC/HsToCore/Coverage.hs +++ b/compiler/GHC/HsToCore/Coverage.hs @@ -126,7 +126,7 @@ hpcInitCode platform this_mod (HpcInfo tickCount hashNo) tickboxes ])) <> semi - tickboxes = pprCLabel platform CStyle (mkHpcTicksLabel $ this_mod) + tickboxes = pprCLabel platform (mkHpcTicksLabel $ this_mod) module_name = hcat (map (text.charToC) $ BS.unpack $ bytesFS (moduleNameFS (moduleName this_mod))) |