summaryrefslogtreecommitdiff
path: root/compiler/GHC/Tc/Module.hs
diff options
context:
space:
mode:
authorromes <rodrigo.m.mesquita@gmail.com>2022-05-14 12:12:19 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-07-03 14:11:31 -0400
commit3a8970ac0c69335a1d229f9c9a71e6e333e99bfb (patch)
tree28a786d6e3bbc40b068cc7fe10433a9a8037b1d6 /compiler/GHC/Tc/Module.hs
parent9e79f6d09c9fbd81150a45d307f753141453c945 (diff)
downloadhaskell-3a8970ac0c69335a1d229f9c9a71e6e333e99bfb.tar.gz
TTG: Move HsModule to L.H.S
Move the definition of HsModule defined in GHC.Hs to Language.Haskell.Syntax with an added TTG parameter and corresponding extension fields. This is progress towards having the haskell-syntax package, as described in #21592
Diffstat (limited to 'compiler/GHC/Tc/Module.hs')
-rw-r--r--compiler/GHC/Tc/Module.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/compiler/GHC/Tc/Module.hs b/compiler/GHC/Tc/Module.hs
index 7345638d2d..d23fad536c 100644
--- a/compiler/GHC/Tc/Module.hs
+++ b/compiler/GHC/Tc/Module.hs
@@ -239,12 +239,14 @@ tcRnModuleTcRnM :: HscEnv
-> TcRn TcGblEnv
-- Factored out separately from tcRnModule so that a Core plugin can
-- call the type checker directly
+tcRnModuleTcRnM _ _
+ (HsParsedModule (L _ (XModule x)) _)
+ _ = dataConCantHappen x
tcRnModuleTcRnM hsc_env mod_sum
(HsParsedModule {
hpm_module =
- (L loc (HsModule _ _ maybe_mod export_ies
- import_decls local_decls mod_deprec
- maybe_doc_hdr)),
+ (L loc (HsModule (XModulePs _ _ mod_deprec maybe_doc_hdr)
+ maybe_mod export_ies import_decls local_decls)),
hpm_src_files = src_files
})
(this_mod, prel_imp_loc)