[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Chicken-users] tcp-connect open ports problem
From: |
felix winkelmann |
Subject: |
Re: [Chicken-users] tcp-connect open ports problem |
Date: |
Mon, 6 Apr 2009 22:35:23 +0200 |
On Mon, Apr 6, 2009 at 2:57 AM, Matt Jones <address@hidden> wrote:
>
> Ah, I found the problem. My first analysis was wrong. In fact, after line
> 609 in tcp.scm in the version 3.4 source, the port isn't closed before
> signalling the exception:
>
> (let ((err (get-socket-error s)))
> (cond ((= err -1)
> ; Not closed here
> ...)
> ((> err 0)
> ; Not closed here
> ...)))
>
> Just adding the line (##net#close s) fixes the problem.
>
Thanks, Matt. I see that Kon has applied your fix.
cheers,
felix