fix: transform should read more than just 1 chunk after writing
This commit is contained in:
parent
3db5cc44a9
commit
b7bead090e
@ -97,7 +97,7 @@ fromTransform t =
|
|||||||
yieldFromReadableHalf = do
|
yieldFromReadableHalf = do
|
||||||
res <- liftEffect (O.read t)
|
res <- liftEffect (O.read t)
|
||||||
case res of
|
case res of
|
||||||
O.ReadJust a -> yield (Just a)
|
O.ReadJust a -> yield (Just a) *> yieldFromReadableHalf
|
||||||
O.ReadWouldBlock -> pure unit
|
O.ReadWouldBlock -> pure unit
|
||||||
O.ReadClosed -> yield Nothing *> pure unit
|
O.ReadClosed -> yield Nothing *> pure unit
|
||||||
go { error, cancel } = do
|
go { error, cancel } = do
|
||||||
|
Loading…
Reference in New Issue
Block a user