diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2021-01-18 15:38:09 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-01-29 23:09:58 -0500 |
| commit | 3b8235334b7838013c9e955db3e7762a1c7fef43 (patch) | |
| tree | bb601c302ad43b60552bdc775b4ccb592d357e71 /compiler/GHC.hs | |
| parent | 5140841ca1acaeaeef893233ae3d08ce4573b01b (diff) | |
| download | haskell-3b8235334b7838013c9e955db3e7762a1c7fef43.tar.gz | |
Make PatSyn immutable
Provoked by #19074, this patch makes GHC.Core.PatSyn.PatSyn
immutable, by recording only the *Name* of the matcher and
builder rather than (as currently) the *Id*.
See Note [Keep Ids out of PatSyn] in GHC.Core.PatSyn.
Updates haddock submodule.
Diffstat (limited to 'compiler/GHC.hs')
| -rw-r--r-- | compiler/GHC.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC.hs b/compiler/GHC.hs index c7e7e5c826..c3524c7776 100644 --- a/compiler/GHC.hs +++ b/compiler/GHC.hs @@ -1280,7 +1280,7 @@ compileCore simplify fn = do gutsToCoreModule safe_mode (Right mg) = CoreModule { cm_module = mg_module mg, cm_types = typeEnvFromEntities (bindersOfBinds (mg_binds mg)) - (mg_tcs mg) + (mg_tcs mg) (mg_patsyns mg) (mg_fam_insts mg), cm_binds = mg_binds mg, cm_safe = safe_mode |