packages feed

network-enumerator 0.1 → 0.1.1

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

Network/Socket/Enumerator.hs view
@@ -64,7 +64,7 @@ iterSocket sock = E.continue step where 	step E.EOF = E.yield () E.EOF 	step (E.Chunks []) = E.continue step-	step (E.Chunks xs) = try (sendMany sock xs)+	step (E.Chunks xs) = try (sendMany sock xs) >> E.continue step  -- | Write data to a 'S.Socket', using 'sendManyTo'. The socket does not -- have to be connected.@@ -75,7 +75,7 @@ iterSocketTo sock addr = E.continue step where 	step E.EOF = E.yield () E.EOF 	step (E.Chunks []) = E.continue step-	step (E.Chunks xs) = try (sendManyTo sock xs addr)+	step (E.Chunks xs) = try (sendManyTo sock xs addr) >> E.continue step  try :: MonadIO m => IO b -> E.Iteratee a m b try io = do
network-enumerator.cabal view
@@ -1,5 +1,5 @@ name: network-enumerator-version: 0.1+version: 0.1.1 synopsis: Enumerators for network sockets license: MIT license-file: license.txt