Function: binhex-update-crc

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

Signature

(binhex-update-crc CRC CHAR &optional COUNT)

Source Code

;; Defined in /usr/src/emacs/lisp/mail/binhex.el.gz
(defun binhex-update-crc (crc char &optional count)
  (if (null count) (setq count 1))
  (while (> count 0)
    (setq crc (logxor (logand (ash crc 8) 65280)
		      (aref binhex-crc-table
			    (logxor (logand (ash crc -8) 255)
				    char)))
	  count (1- count)))
  crc)