Function: nslookup--ipv6-expand
nslookup--ipv6-expand is a byte-compiled function defined in
net-utils.el.gz.
Signature
(nslookup--ipv6-expand IPV6-VECTOR)
Source Code
;; Defined in /usr/src/emacs/lisp/net/net-utils.el.gz
(defun nslookup--ipv6-expand (ipv6-vector)
(let ((len (length ipv6-vector)))
(if (< len 8)
(let* ((pivot (cl-position 0 ipv6-vector))
(head (cl-subseq ipv6-vector 0 pivot))
(tail (cl-subseq ipv6-vector (1+ pivot) len)))
(vconcat head (make-vector (- 8 (1- len)) 0) tail))
ipv6-vector)))