X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fdns.el;h=3c1bd54acfdcbe3c5a6794dc132db06fb4637297;hb=a913d03099e201791b5aa43717a784d92ad1df76;hp=77a194ec436b821b090ddf59de3be9729a495088;hpb=243e2b9f043dc48b35ce77f2f283e32ef7c0291e;p=gnus diff --git a/lisp/dns.el b/lisp/dns.el index 77a194ec4..3c1bd54ac 100644 --- a/lisp/dns.el +++ b/lisp/dns.el @@ -252,8 +252,8 @@ If TCP-P, the first two bytes of the package with be the length field." (nreverse spec)))) (defun dns-read-int32 () - ;; Full 32 bit Integers can't be handled by Emacs. If we use - ;; floats, it works. + ;; Full 32 bit Integers can't be handled by 32-bit Emacsen. If we + ;; use floats, it works. (format "%.0f" (+ (* (dns-read-bytes 1) 16777216.0) (dns-read-bytes 3))))