on master help sign in
remove stop
commitcad6f1913b635ad3d1366694da81e79eee41e6e2 authorHarendra Kumar <harendra.kumar@gmail.com> dateThu 22 Jun 2017, 13:12 (9 years ago) parent9779a0b
1 file changed−7
src/Duct/AsyncT.hs−7
src/Duct/AsyncT.hs−7
@@ -94,13 +94,6 @@ instance Monad m => Alternative (AsyncT m) where
9494 RemoteNode -> return Nothing
9595 _ -> maybe (runAsyncT y) (return . Just) mx
9696
97−-- XXX remove this, use mzero instead
98−-- | A synonym of 'empty' that can be used in a monadic expression. It stops
99−-- the computation, which allows the next computation in an 'Alternative'
100−-- ('<|>') composition to run.
101−stop :: Alternative m => m stopped
102−stop = empty
103−
10497------------------------------------------------------------------------------
10598-- Monad
10699------------------------------------------------------------------------------