haskell - 如何检测管道中输入的结束？

Question

我正在尝试使用network-conduit作为（已修补）HaskellNet 的IMAP的后端。所需的操作之一是检测流是否打开。目前我正在使用

isOpen :: (Monad m) => ConduitM i o m Bool
isOpen = await >>= maybe (return False) ((True <$) . leftover)

这是正确的，还是有更好的方法？

Answer 1

没错，唯一可能的改进是您可以使用peek辅助功能，但是您在这里所拥有的一切都很好。