fix: bugs

This commit is contained in:
orion 2024-05-03 13:06:36 -05:00
parent a3be110749
commit 4c72c8f3b7
Signed by: orion
GPG Key ID: 6D4165AE4C928719

View File

@ -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