Add a TODO comment in workLoopFIFO
commit648a54a61ea214cd27069922a1e15d1561a1408a
authorHarendra Kumar <harendra@composewell.com>
dateThu 6 Oct 2022, 18:19 (4 years ago)
parentc7b2e4f
src/Streamly/Internal/Data/Stream/Concurrent/Channel/Interleave.hs+2
@@ -87,6 +87,8 @@ workLoopFIFO q sv winfo = run
8787 yieldk a r = do
8888 res <- liftIO $ yield sv winfo a
8989 runInIO <- askRunInIO
90+ -- XXX If the queue is empty we do not need to enqueue. We can just
91+ -- continue evaluating the stream.
9092 liftIO $ enqueueFIFO sv q (runInIO, r)
9193 return $ if res then Continue else Suspend
9294