File tree 1 file changed +5
-1
lines changed
plugins/hls-refactor-plugin/src/Development/IDE/Plugin
1 file changed +5
-1
lines changed Original file line number Diff line number Diff line change @@ -1982,14 +1982,18 @@ smallerRangesForBindingExport lies b =
1982
1982
where
1983
1983
unqualify = snd . breakOnEnd " ."
1984
1984
b' = wrapOperatorInParens $ unqualify b
1985
+
1985
1986
#if MIN_VERSION_ghc(9,9,0)
1986
1987
ranges' (L _ (IEThingWith _ thing _ inners _))
1988
+ | T. unpack (printOutputable thing) == b' = []
1989
+ | otherwise =
1990
+ [ locA l' | L l' x <- inners, T. unpack (printOutputable x) == b']
1987
1991
#else
1988
1992
ranges' (L _ (IEThingWith _ thing _ inners))
1989
- #endif
1990
1993
| T. unpack (printOutputable thing) == b' = []
1991
1994
| otherwise =
1992
1995
[ locA l' | L l' x <- inners, T. unpack (printOutputable x) == b']
1996
+ #endif
1993
1997
ranges' _ = []
1994
1998
1995
1999
rangesForBinding' :: String -> LIE GhcPs -> [SrcSpan ]
You can’t perform that action at this time.
0 commit comments