[Openmcl-devel] UDP Socket problem on ccl 1.8-dev-r14960-trunk x8664

[Gary Byers]

This was introduced in the trunk about a week ago and should be fixed
now (in r15049).

On Fri, 28 Oct 2011, ??? wrote:

>
> I'm making SuperCollider3 client on closure cl.
>
> but. recently?.
>
>
>
> Welcome to Clozure Common Lisp Version 1.8-dev-r15048M-trunk  (DarwinX8664)!
> ? (defparameter *message* (make-array 20 :element-type '(unsigned-byte 8)
>                               :initial-contents '(47 103 95 102 114 101 101 65 108 108 0 0 44 105 0 0 0 0 0 0)))
> *MESSAGE*
> ? (defparameter *server* (make-socket :type :datagram :local-port 57150))
> *SERVER*
> ? (defparameter *client* (make-socket :type :datagram :remote-port 57150))
> *CLIENT*
> ? (ccl::process-run-function "server" (lambda () (print (ccl::receive-from *server* 100))))
> #<PROCESS server(2) [Active] #x302000987C0D>
> ? (ccl::send-to *client* *message* (length *message*))
> 20
>
> ? #(108 0 108 0 108 0 108 0 108 0 108 0 108 0 108 0 108 0 108 0) 
>
>
>
> but?32bit version is fine.
>
> Welcome to Clozure Common Lisp Version 1.8-dev-r14960-trunk  (DarwinX8632)!
> ? (defparameter *message* (make-array 20 :element-type '(unsigned-byte 8)
>                              :initial-contents '(47 103 95 102 114 101 101 65 108 108 0 0 44 105 0 0 0 0 0 0)))
> *MESSAGE*
> ?  (defparameter *server* (make-socket :type :datagram :local-port 57150))
> *SERVER*
> ?  (defparameter *client* (make-socket :type :datagram :remote-port 57150))
> *CLIENT*
> ?  (ccl::process-run-function "server" (lambda () (print (ccl::receive-from *server* 100))))
> #<PROCESS server(2) [Reset] #xC510EE6>
> ?  (ccl::send-to *client* *message* (length *message*))
> 20
>
> ? #(47 103 95 102 114 101 101 65 108 108 0 0 44 105 0 0 0 0 0 0) 
>
>
> also  1.7-dev-r14869  (DarwinX8664)!  is fine, too.
>
> is it bug??
>
>
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel