Function: binhex-verify-crc

binhex-verify-crc is a byte-compiled function defined in binhex.el.gz.

Signature

(binhex-verify-crc BUFFER START END)

Source Code

;; Defined in /usr/src/emacs/lisp/mail/binhex.el.gz
(defun binhex-verify-crc (buffer start end)
  (with-current-buffer buffer
    (let ((pos start) (crc 0) (last (- end 2)))
      (while (< pos last)
	(setq crc (binhex-update-crc crc (char-after pos))
	      pos (1+ pos)))
      (if (= crc (binhex-string-big-endian (buffer-substring last end)))
	  nil
	(error "CRC error")))))