@@ -240,7 +240,7 @@ module Development.IDE.GHC.Compat.Core (
240
240
SrcLoc. mkGeneralSrcSpan ,
241
241
SrcLoc. mkRealSrcSpan ,
242
242
SrcLoc. mkRealSrcLoc ,
243
- getRealSrcSpan ,
243
+ SrcLoc. getRealSrcSpan ,
244
244
SrcLoc. realSrcLocSpan ,
245
245
SrcLoc. realSrcSpanStart ,
246
246
SrcLoc. realSrcSpanEnd ,
@@ -309,13 +309,13 @@ module Development.IDE.GHC.Compat.Core (
309
309
Module. ml_hs_file ,
310
310
Module. ml_obj_file ,
311
311
Module. ml_hi_file ,
312
- Development.IDE.GHC.Compat.Core . ml_hie_file ,
312
+ Module . ml_hie_file ,
313
313
-- * DataCon
314
- Development.IDE.GHC.Compat.Core . dataConExTyCoVars ,
314
+ DataCon . dataConExTyCoVars ,
315
315
-- * Role
316
316
Role (.. ),
317
317
-- * Panic
318
- PlainGhcException ,
318
+ Plain. PlainGhcException ,
319
319
panic ,
320
320
panicDoc ,
321
321
-- * Other
@@ -926,17 +926,11 @@ getLoc :: SrcLoc.HasSrcSpan a => a -> SrcLoc.SrcSpan
926
926
getLoc = SrcLoc. getLoc
927
927
#endif
928
928
929
- getRealSrcSpan :: SrcLoc. RealLocated a -> SrcLoc. RealSrcSpan
930
- getRealSrcSpan = SrcLoc. getRealSrcSpan
931
-
932
929
-- | Add the @-boot@ suffix to all output file paths associated with the
933
930
-- module, not including the input file itself
934
931
addBootSuffixLocnOut :: GHC. ModLocation -> GHC. ModLocation
935
932
addBootSuffixLocnOut = Module. addBootSuffixLocnOut
936
933
937
- dataConExTyCoVars :: DataCon -> [TyCoVar ]
938
- dataConExTyCoVars = DataCon. dataConExTyCoVars
939
-
940
934
#if !MIN_VERSION_ghc(9,0,0)
941
935
-- Linear Haskell
942
936
type Scaled a = a
@@ -992,17 +986,12 @@ noExtField :: GHC.NoExt
992
986
noExtField = GHC. noExt
993
987
#endif
994
988
995
- ml_hie_file :: GHC. ModLocation -> FilePath
996
- ml_hie_file = Module. ml_hie_file
997
-
998
989
#if !MIN_VERSION_ghc(9,0,0)
999
990
pattern NotBoot , IsBoot :: IsBootInterface
1000
991
pattern NotBoot = False
1001
992
pattern IsBoot = True
1002
993
#endif
1003
994
1004
- type PlainGhcException = Plain. PlainGhcException
1005
-
1006
995
#if MIN_VERSION_ghc(9,0,0)
1007
996
-- This is from the old api, but it still simplifies
1008
997
pattern ConPatIn :: SrcLoc. Located (ConLikeP GhcPs ) -> HsConPatDetails GhcPs -> Pat GhcPs
0 commit comments