>  Ok, I think I found an approach that will satisfy everybody.  This 
> solution only requires providing three utility functions in `pipes-parse`:
>
>     debugView
>         :: (Producer a m x -> Producer b m y)
>         -> (Producer a m x -> Producer b m y)
>     debugView = id
>  
>     debugZoom
>         :: (StateT (Producer a m x) m r -> StateT (Producer b m y) m r)
>         -> (StateT (Producer a m x) m r -> StateT (Producer b m y) m r)
>     debugZoom = id
>  
>     debugOver
>         :: (   (Producer a m w -> Producer b m x)
>             -> (Producer c m y -> Producer d m z) )
>         -> (   (Producer a m w -> Producer b m x)
>             -> (Producer c m y -> Producer d m z) )
>     debugOver = id
>
>
is `debugView` supposed to work with FreeT lenses such as `lines` ?

-- 
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 [email protected].
To post to this group, send email to [email protected].

Reply via email to