Do you get better results instead of making the parser into a pipe, you use 
something like this (named for the similar operation in 
`pipes-attoparsec`). It might reduce to more fundamental pipes-parse 
things, I'm not sure:


    parsed :: Monad m 
           => PP.Parser a m (Maybe b) 
           -> Producer a m r 
           -> Producer b m (Producer a m r)
    parsed (StateT s) = loop where
      loop p = do
        (a,rest) <- lift (s p)
        case a of
          Nothing -> return rest
          Just b -> do 
            yield b
            loop rest



-- 
You received this message because you are subscribed to the Google Groups 
"Haskell Pipes" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to haskell-pipes+unsubscr...@googlegroups.com.
To post to this group, send email to haskell-pipes@googlegroups.com.

Reply via email to