hi,
On Thu, Mar 27, 2008 at 06:12:15PM -0400, Raymond Medeiros wrote:
> (define send-data
> (lambda (ip port msg)
> (define-values (i o) (tcp-connect (->string ip) port))
> (write msg o)
> (let ((result (read-line i)))
> (close-input-port i)
> (close-output-port o) resul
On Thu, Mar 27, 2008 at 6:12 PM, Raymond Medeiros
<[EMAIL PROTECTED]> wrote:
>
> can someone give me a reasonable explanation as to why this would not
> work on Win32 but works properly on Linux?
> what am i missing here?
Just curious, in what way doesn't it work?
Graham
>
> (use tcp-server)
can someone give me a reasonable explanation as to why this would not
work on Win32 but works properly on Linux?
what am i missing here?
(use tcp-server)
(thread-start!
(make-thread
(lambda ()
((make-tcp-server
(tcp-listen 9000)
(lambda ()
(write-line