diff options
| author | Fendor <power.walross@gmail.com> | 2020-09-03 17:30:49 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-10-01 18:35:33 -0400 |
| commit | fc351ab8fbf02eaf473e97b3ce8c4cddcba3a8a5 (patch) | |
| tree | a3f38991578c914912e7417140bc0a123986aa99 /compiler/GHC/Tc/Module.hs | |
| parent | d2cfad96831edbe50aeddaefc1a3b0fb0dd73bc2 (diff) | |
| download | haskell-fc351ab8fbf02eaf473e97b3ce8c4cddcba3a8a5.tar.gz | |
Use HomeUnit for main module without module declaration
Diffstat (limited to 'compiler/GHC/Tc/Module.hs')
| -rw-r--r-- | compiler/GHC/Tc/Module.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Tc/Module.hs b/compiler/GHC/Tc/Module.hs index 784625f3a2..6ae19bb6c7 100644 --- a/compiler/GHC/Tc/Module.hs +++ b/compiler/GHC/Tc/Module.hs @@ -194,7 +194,7 @@ tcRnModule hsc_env mod_sum save_rn_syntax = (mkHomeModule home_unit mod, mod_loc) | otherwise -- 'module M where' is omitted - = (mAIN, srcLocSpan (srcSpanStart loc)) + = (mkHomeModule home_unit mAIN_NAME, srcLocSpan (srcSpanStart loc)) |