wip: explore removing delays(10)
This commit is contained in:
parent
de22f44f86
commit
0ef7240d61
@ -112,7 +112,6 @@ fromTransform t =
|
|||||||
needsDrain <- liftEffect $ O.needsDrain t
|
needsDrain <- liftEffect $ O.needsDrain t
|
||||||
if needsDrain then do
|
if needsDrain then do
|
||||||
liftAff $ delay $ wrap 0.0
|
liftAff $ delay $ wrap 0.0
|
||||||
liftAff $ O.awaitReadableOrClosed t
|
|
||||||
yieldWhileReadable
|
yieldWhileReadable
|
||||||
pure $ Loop {error, cancel}
|
pure $ Loop {error, cancel}
|
||||||
else do
|
else do
|
||||||
|
Loading…
Reference in New Issue
Block a user