summaryrefslogtreecommitdiff
path: root/compiler/GHC/Builtin/Names/TH.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Builtin/Names/TH.hs')
-rw-r--r--compiler/GHC/Builtin/Names/TH.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Builtin/Names/TH.hs b/compiler/GHC/Builtin/Names/TH.hs
index 3cd55b566d..4dd1b43e83 100644
--- a/compiler/GHC/Builtin/Names/TH.hs
+++ b/compiler/GHC/Builtin/Names/TH.hs
@@ -170,7 +170,7 @@ thLib = mkTHModule (fsLit "Language.Haskell.TH.Lib.Internal")
qqLib = mkTHModule (fsLit "Language.Haskell.TH.Quote")
mkTHModule :: FastString -> Module
-mkTHModule m = mkModule thUnitId (mkModuleNameFS m)
+mkTHModule m = mkModule thUnit (mkModuleNameFS m)
libFun, libTc, thFun, thTc, thCls, thCon, qqFun :: FastString -> Unique -> Name
libFun = mk_known_key_name varName thLib