mirror of
https://github.com/koalaman/shellcheck.git
synced 2025-08-24 03:47:57 +08:00
Avoid a zip that breaks fusion
This commit is contained in:
@@ -3088,7 +3088,7 @@ checkUnmatchableCases params t =
|
|||||||
return $ warn (getId candidate) 2195
|
return $ warn (getId candidate) 2195
|
||||||
"This pattern will never match the case statement's word. Double check them."
|
"This pattern will never match the case statement's word. Double check them."
|
||||||
|
|
||||||
tupMap f l = zip l (map f l)
|
tupMap f l = map (\x -> (x, f x)) l
|
||||||
checkDoms ((glob, Just x), rest) =
|
checkDoms ((glob, Just x), rest) =
|
||||||
case filter (\(_, p) -> x `pseudoGlobIsSuperSetof` p) valids of
|
case filter (\(_, p) -> x `pseudoGlobIsSuperSetof` p) valids of
|
||||||
((first,_):_) -> do
|
((first,_):_) -> do
|
||||||
|
Reference in New Issue
Block a user