fix: bugs
This commit is contained in:
parent
a3be110749
commit
4c72c8f3b7
@ -150,7 +150,7 @@ foreach stream cb =
|
|||||||
else do
|
else do
|
||||||
r' <- MaybeT $ pure r
|
r' <- MaybeT $ pure r
|
||||||
lift $ cb r'
|
lift $ cb r'
|
||||||
pure unit
|
empty
|
||||||
|
|
||||||
readToQ =
|
readToQ =
|
||||||
whileJust
|
whileJust
|
||||||
|
Loading…
Reference in New Issue
Block a user