File tree Expand file tree Collapse file tree
plugins/hls-explicit-imports-plugin/src/Ide/Plugin Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -299,9 +299,16 @@ importPackageInlayHintProvider _ state _ InlayHintParams {_textDocument = TextDo
299299 realSrcSpanToEndPosition :: RealSrcSpan -> Position
300300 realSrcSpanToEndPosition realSrcSpan = realSrcSpanToRange realSrcSpan ^. L. end
301301
302+ importAnnotation :: ImportDecl GhcPs -> EpAnnImportDecl
303+ #if MIN_VERSION_ghc(9,5,0)
304+ importAnnotation = anns . ideclAnn . ideclExt
305+ #else
306+ importAnnotation = anns . ideclExt
307+ #endif
308+
302309 hintPosition :: ImportDecl GhcPs -> Position
303310 hintPosition importDecl =
304- let importAnn = anns $ ideclAnn $ ideclExt importDecl
311+ let importAnn = importAnnotation importDecl
305312 importPosition = realSrcSpanToEndPosition . epaLocationRealSrcSpan $ importDeclAnnImport importAnn
306313 moduleNamePosition = realSrcSpanToEndPosition $ realSrcSpan $ getLoc $ ideclName importDecl
307314 maybeQualifiedPosition = realSrcSpanToEndPosition . epaLocationRealSrcSpan <$> importDeclAnnQualified importAnn
You can’t perform that action at this time.
0 commit comments