diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2022-10-20 20:00:49 +0100 |
|---|---|---|
| committer | Alan Zimmerman <alan.zimm@gmail.com> | 2022-10-20 23:26:40 +0100 |
| commit | 5951a3173144636c646d8987b9e2e6baa60c3842 (patch) | |
| tree | ba6d5ee9008e01fbe3d29a629a496138cbee6a1a /compiler/GHC/Tc/Utils/Backpack.hs | |
| parent | b17cfc9c4b341e122294c0701803fc8f521fa210 (diff) | |
| download | haskell-wip/az/bufspan-in-anchor.tar.gz | |
Diffstat (limited to 'compiler/GHC/Tc/Utils/Backpack.hs')
| -rw-r--r-- | compiler/GHC/Tc/Utils/Backpack.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/Tc/Utils/Backpack.hs b/compiler/GHC/Tc/Utils/Backpack.hs index 4cba3f20b1..06219fb374 100644 --- a/compiler/GHC/Tc/Utils/Backpack.hs +++ b/compiler/GHC/Tc/Utils/Backpack.hs @@ -84,6 +84,7 @@ import GHC.Utils.Panic.Plain import GHC.Data.FastString import GHC.Data.Maybe +import qualified GHC.Data.Strict as Strict import Control.Monad import Data.List (find) @@ -368,7 +369,7 @@ tcRnCheckUnit hsc_env uid = HsigFile -- bogus False (mainModIs (hsc_HUE hsc_env)) - (realSrcLocSpan (mkRealSrcLoc (fsLit loc_str) 0 0)) -- bogus + (realSrcLocSpan (mkRealSrcLoc (fsLit loc_str) 0 0) Strict.Nothing) -- bogus $ checkUnit uid where dflags = hsc_dflags hsc_env |