Function: md4-unpack-int16

md4-unpack-int16 is a byte-compiled function defined in md4.el.gz.

Signature

(md4-unpack-int16 STR)

Source Code

;; Defined in /usr/src/emacs/lisp/md4.el.gz
(defun md4-unpack-int16 (str)
  (if (eq 2 (length str))
      (+ (ash (aref str 1) 8) (aref str 0))
    (error "%s is not 2 bytes long" str)))