 
            
            
            
            
                3 Feb
                
                    2006
                
            
            
                3 Feb
                
                '06
                
            
            
            
        
    
                6:41 a.m.
            
        Simon Marlow wrote:
-- | Takes an output stream and an input stream, and pipes all the -- data from the former into the latter. streamConnect :: (OutputStream o, InputStream i) => o -> i -> IO ()
That's the wrong way around, of course :-) It pipes everything from the input stream to the output stream. Cheers, Simon