summaryrefslogtreecommitdiff
path: root/compiler/GHC/Tc/Utils/Backpack.hs
diff options
context:
space:
mode:
authorFendor <power.walross@gmail.com>2020-09-30 19:04:33 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-10-01 18:35:33 -0400
commitdca1cb22cab4fa7f5937e9ffdc0ee32313dbd01c (patch)
treead86e016ffcc557cf5e0a18fcd67447ae98e611c /compiler/GHC/Tc/Utils/Backpack.hs
parentfc351ab8fbf02eaf473e97b3ce8c4cddcba3a8a5 (diff)
downloadhaskell-dca1cb22cab4fa7f5937e9ffdc0ee32313dbd01c.tar.gz
Remove mAIN completely
Diffstat (limited to 'compiler/GHC/Tc/Utils/Backpack.hs')
-rw-r--r--compiler/GHC/Tc/Utils/Backpack.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/compiler/GHC/Tc/Utils/Backpack.hs b/compiler/GHC/Tc/Utils/Backpack.hs
index 407e666e6f..9d901b21c3 100644
--- a/compiler/GHC/Tc/Utils/Backpack.hs
+++ b/compiler/GHC/Tc/Utils/Backpack.hs
@@ -58,7 +58,6 @@ import GHC.Data.Maybe
import GHC.Tc.Utils.Env
import GHC.Types.Var
import GHC.Iface.Syntax
-import GHC.Builtin.Names
import qualified Data.Map as Map
import GHC.Driver.Finder
@@ -346,7 +345,7 @@ tcRnCheckUnit hsc_env uid =
initTc hsc_env
HsigFile -- bogus
False
- mAIN -- bogus
+ (mainModIs dflags)
(realSrcLocSpan (mkRealSrcLoc (fsLit loc_str) 0 0)) -- bogus
$ checkUnit uid
where