diff options
Diffstat (limited to 'compiler/GHC/Iface/Syntax.hs')
| -rw-r--r-- | compiler/GHC/Iface/Syntax.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/Iface/Syntax.hs b/compiler/GHC/Iface/Syntax.hs index 299dfe553b..5fad9e1737 100644 --- a/compiler/GHC/Iface/Syntax.hs +++ b/compiler/GHC/Iface/Syntax.hs @@ -44,6 +44,7 @@ module GHC.Iface.Syntax ( import GHC.Prelude +import qualified GHC.Data.Strict as Strict import GHC.Builtin.Names ( unrestrictedFunTyConKey, liftedTypeKindTyConKey ) import GHC.Types.Unique ( hasKey ) import GHC.Iface.Type @@ -2464,7 +2465,7 @@ instance Binary IfaceTickish where let start = mkRealSrcLoc file sl sc end = mkRealSrcLoc file el ec name <- get bh - return (IfaceSource (mkRealSrcSpan start end) name) + return (IfaceSource (mkRealSrcSpan start end Strict.Nothing) name) _ -> panic ("get IfaceTickish " ++ show h) instance Binary IfaceConAlt where |