Fix accidental argument swap
This commit is contained in:
parent
7504c083a1
commit
c06bd28d9a
|
@ -129,7 +129,7 @@ mapDepGenM_ f input = do
|
||||||
|
|
||||||
filterDepGenM :: (TokenableTo [Bool] v, TokenableTo [a] u) => v -> u -> DepGenM' [a]
|
filterDepGenM :: (TokenableTo [Bool] v, TokenableTo [a] u) => v -> u -> DepGenM' [a]
|
||||||
filterDepGenM mask input = do
|
filterDepGenM mask input = do
|
||||||
tup <- toTupleToken mask input
|
tup <- toTupleToken input mask
|
||||||
genDependency (makeDependency tup FilterComp)
|
genDependency (makeDependency tup FilterComp)
|
||||||
|
|
||||||
zipDepGenM :: (TokenableTo [a] v, TokenableTo [b] u) => v -> u -> DepGenM' [(a, b)]
|
zipDepGenM :: (TokenableTo [a] v, TokenableTo [b] u) => v -> u -> DepGenM' [(a, b)]
|
||||||
|
|
Loading…
Reference in New Issue