Inline an uncurry
This commit is contained in:
parent
a6efd02807
commit
c290eace54
|
@ -2223,14 +2223,14 @@ checkUnassignedReferences' includeGlobals params t = warnings
|
||||||
match <- getBestMatch var
|
match <- getBestMatch var
|
||||||
return $ " (did you mean '" ++ match ++ "'?)"
|
return $ " (did you mean '" ++ match ++ "'?)"
|
||||||
|
|
||||||
warningFor var place = do
|
warningFor (var, place) = do
|
||||||
guard $ isVariableName var
|
guard $ isVariableName var
|
||||||
guard . not $ isInArray var place || isGuarded place
|
guard . not $ isInArray var place || isGuarded place
|
||||||
(if includeGlobals || isLocal var
|
(if includeGlobals || isLocal var
|
||||||
then warningForLocals
|
then warningForLocals
|
||||||
else warningForGlobals) var place
|
else warningForGlobals) var place
|
||||||
|
|
||||||
warnings = execWriter . sequence $ mapMaybe (uncurry warningFor) unassigned
|
warnings = execWriter . sequence $ mapMaybe warningFor unassigned
|
||||||
|
|
||||||
-- Due to parsing, foo=( [bar]=baz ) parses 'bar' as a reference even for assoc arrays.
|
-- Due to parsing, foo=( [bar]=baz ) parses 'bar' as a reference even for assoc arrays.
|
||||||
-- Similarly, ${foo[bar baz]} may not be referencing bar/baz. Just skip these.
|
-- Similarly, ${foo[bar baz]} may not be referencing bar/baz. Just skip these.
|
||||||
|
|
Loading…
Reference in New Issue