diff options
author | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2022-10-24 19:52:40 +0200 |
---|---|---|
committer | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2022-10-24 22:05:40 +0200 |
commit | 4c0877d05463d767f632eb540a59e756b48f46a5 (patch) | |
tree | f41ef3c5067247615f5e70aaca0febd3f2f6bb67 /compiler/GHC/Hs/Dump.hs | |
parent | 8d2dbe2db4cc7c8b6d39b1ea64b0508304a3273c (diff) | |
download | haskell-wip/strings-refactor.tar.gz |
Cleanup String/FastString conversionswip/strings-refactor
Remove unused mkPtrString and isUnderscoreFS.
We no longer use mkPtrString since 1d03d8bef96.
Remove unnecessary conversions between FastString and String and back.
Diffstat (limited to 'compiler/GHC/Hs/Dump.hs')
-rw-r--r-- | compiler/GHC/Hs/Dump.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Hs/Dump.hs b/compiler/GHC/Hs/Dump.hs index 77d2036425..942ece7f37 100644 --- a/compiler/GHC/Hs/Dump.hs +++ b/compiler/GHC/Hs/Dump.hs @@ -158,7 +158,7 @@ showAstData bs ba a0 = blankLine $$ showAstData' a0 occName n = braces $ text "OccName:" - <+> text (occNameString n) + <+> ftext (occNameFS n) moduleName :: ModuleName -> SDoc moduleName m = braces $ text "ModuleName:" <+> ppr m |