fix: bugs

This commit is contained in:
bingus 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
r' <- MaybeT $ pure r
lift $ cb r'
pure unit
empty
readToQ =
whileJust