Inspect 'alias' commands for referenced variables (Fixes #1832)
This commit is contained in:
parent
a75219e525
commit
4c9210af79
|
@ -2127,6 +2127,7 @@ prop_checkUnused43= verifyTree checkUnusedAssignments "DEFINE_string foo '' ''"
|
||||||
prop_checkUnused44= verifyNotTree checkUnusedAssignments "DEFINE_string \"foo$ibar\" x y"
|
prop_checkUnused44= verifyNotTree checkUnusedAssignments "DEFINE_string \"foo$ibar\" x y"
|
||||||
prop_checkUnused45= verifyTree checkUnusedAssignments "readonly foo=bar"
|
prop_checkUnused45= verifyTree checkUnusedAssignments "readonly foo=bar"
|
||||||
prop_checkUnused46= verifyTree checkUnusedAssignments "readonly foo=(bar)"
|
prop_checkUnused46= verifyTree checkUnusedAssignments "readonly foo=(bar)"
|
||||||
|
prop_checkUnused47= verifyNotTree checkUnusedAssignments "a=1; alias hello='echo $a'"
|
||||||
checkUnusedAssignments params t = execWriter (mapM_ warnFor unused)
|
checkUnusedAssignments params t = execWriter (mapM_ warnFor unused)
|
||||||
where
|
where
|
||||||
flow = variableFlow params
|
flow = variableFlow params
|
||||||
|
|
|
@ -544,8 +544,9 @@ getReferencedVariableCommand base@(T_SimpleCommand _ _ (T_NormalWord _ (T_Litera
|
||||||
else []
|
else []
|
||||||
"trap" ->
|
"trap" ->
|
||||||
case rest of
|
case rest of
|
||||||
head:_ -> map (\x -> (head, head, x)) $ getVariablesFromLiteralToken head
|
head:_ -> map (\x -> (base, head, x)) $ getVariablesFromLiteralToken head
|
||||||
_ -> []
|
_ -> []
|
||||||
|
"alias" -> [(base, token, name) | token <- rest, name <- getVariablesFromLiteralToken token]
|
||||||
_ -> []
|
_ -> []
|
||||||
where
|
where
|
||||||
getReference t@(T_Assignment _ _ name _ value) = [(t, t, name)]
|
getReference t@(T_Assignment _ _ name _ value) = [(t, t, name)]
|
||||||
|
|
Loading…
Reference in New Issue