fsharp/fsharpx — pull request #81 by pocketberserker (2012-08-07 00:45:35+00:00)
Title: Fix Iteratee.bind

Haskell implementation of inner, which is an internal function of Iteratee.bind

case r1 of
Continue k -> return (Continue (bind . k))
Error err -> return (Error err)
Yield x (Chunks []) -> runIteratee (f x)
Yield x extra -> runIteratee (f x) >>= \r2 ->
case r2 of ...

Done(x, Chunk Empty) pattarn has not been implemented in the current implementation.