fix hlint hints
commit7d6cbb0790144ba8f69d211f7d02c7744d74ec19
authorAgentM <agentm@themactionfaction.com>
dateWed 15 Nov 2017, 23:42 (9 years ago)
parentb2cac8f
src/lib/ProjectM36/MiscUtils.hs+2−2
@@ -9,7 +9,7 @@ dupes (x:y:xs) = dupes(x:[y]) ++ dupes(y : xs)
99
1010--Data.Vector.indexed but for lists
1111indexed :: [a] -> [(Int, a)]
12−indexed ls = go 0 ls
12+indexed = go 0
1313 where
1414 go _ [] = []
15− go i (v:ys) = (i,v):(go (i+1) ys)
15+ go i (v:ys) = (i,v):go (i+1) ys