fix: catch incorrect stream implementations
This commit is contained in:
parent
3f4bc12d36
commit
7076b13df4
@ -87,6 +87,7 @@ fromTransform :: forall a b m. MonadThrow Error m => MonadAff m => O.Transform a
|
|||||||
fromTransform t =
|
fromTransform t =
|
||||||
let
|
let
|
||||||
cleanup removeErrorListener = do
|
cleanup removeErrorListener = do
|
||||||
|
yieldWhileReadable
|
||||||
liftEffect $ O.end t
|
liftEffect $ O.end t
|
||||||
liftEffect $ removeErrorListener
|
liftEffect $ removeErrorListener
|
||||||
fromReadable t
|
fromReadable t
|
||||||
|
Loading…
Reference in New Issue
Block a user