bug#6346: 23.1; set-process-datagram-address failure?

bug#6346: 23.1; set-process-datagram-address failure?

[Jason Feng]

I was trying the following elisp, and ended up with an unexpected result...

(setq udp-cl
      (make-network-process
       :name "baz" :buffer nil
       :service 53 :host "64.68.192.10"
       :family 'ipv4 :filter (lambda (p s)
			       (print s))
       :type 'datagram
       :coding 'binary))

(process-datagram-address udp-cl)
 => [64 68 192 10 53]
(set-process-datagram-address udp-cl (process-datagram-address udp-cl))
 => [64 68 192 10 53]
(process-datagram-address udp-cl)
 => [0 0 0 0 53]

Can anybody else duplicate this?

In GNU Emacs 23.1.1 (i486-pc-linux-gnu, GTK+ Version 2.18.3)
 of 2010-03-25 on palmer, modified by Debian
Windowing system distributor `The X.Org Foundation', version 11.0.10604000
configured using `configure  '--build=i486-linux-gnu' '--host=i486-linux-gnu' '--prefix=/usr' '--sharedstatedir=/var/lib' '--libexecdir=/usr/lib' '--localstatedir=/var/lib' '--infodir=/usr/share/info' '--mandir=/usr/share/man' '--with-pop=yes' '--enable-locallisppath=/etc/emacs23:/etc/emacs:/usr/local/share/emacs/23.1/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/23.1/site-lisp:/usr/share/emacs/site-lisp:/usr/share/emacs/23.1/leim' '--with-x=yes' '--with-x-toolkit=gtk' '--with-toolkit-scroll-bars' 'build_alias=i486-linux-gnu' 'host_alias=i486-linux-gnu' 'CFLAGS=-DDEBIAN -g -O2' 'LDFLAGS=-g' 'CPPFLAGS=''

bug#6346: 23.1; set-process-datagram-address failure?

[Andreas Schwab]

Jason Feng <jfeng@ozbert.com> writes:

> I was trying the following elisp, and ended up with an unexpected result...
>
> (setq udp-cl
>       (make-network-process
>        :name "baz" :buffer nil
>        :service 53 :host "64.68.192.10"
>        :family 'ipv4 :filter (lambda (p s)
> 			       (print s))
>        :type 'datagram
>        :coding 'binary))
>
> (process-datagram-address udp-cl)
>  => [64 68 192 10 53]
> (set-process-datagram-address udp-cl (process-datagram-address udp-cl))
>  => [64 68 192 10 53]
> (process-datagram-address udp-cl)
>  => [0 0 0 0 53]

Thanks, I have installed a patch.

Andreas.

-- 
Andreas Schwab, schwab@linux-m68k.org
GPG Key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."