Seems to work perfectly for me. The statement you're expecting to be
printed won't be printed until the original server (running on 5000)
closes its socket. If I connect it to Warp, this takes about 30
seconds, which is the slowloris timeout period.
On Sat, Mar 10, 2012 at 10:01 PM, grant
Unfortunately I don't have a solution to this.
Here is some code and output that hopefully explains what is happening https://gist.github.com/2012723
The problem is that the clientSrc $$ serverSink appears to run and according to Alexander, the socket closes. But the thread seems to hang inside the "clientSrc $$ serverSink" command and then nothing after that command is run (until the process is terminated).
I would have expected the register command to run and the statement "END clientSrc serverSink" to display. When I kill the process on Ubuntu all three exceptions are then thrown at once and the rest of the thread continue.
Thanks for taking a look at this, Grant
_______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe