Function: exif--read-number-be

exif--read-number-be is a byte-compiled function defined in exif.el.gz.

Signature

(exif--read-number-be BYTES)

Documentation

Read BYTES octets from the buffer as a chunk of big-endian bytes.

Advance point to after the read bytes.

Source Code

;; Defined in /usr/src/emacs/lisp/image/exif.el.gz
(defun exif--read-number-be (bytes)
  "Read BYTES octets from the buffer as a chunk of big-endian bytes.
Advance point to after the read bytes."
  (when (> (+ (point) bytes) (point-max))
    (signal 'exif-error "Premature end of file"))
  (let ((sum 0))
    (dotimes (_ bytes)
      (setq sum (+ (* sum 256) (following-char)))
      (forward-char 1))
    sum))