Lines Matching +defs:table +defs:string
41 "*Non-nil value should be a string that names a binhex decoder.
44 :type 'string
50 :type '(repeat string))
98 (defvar binhex-crc-table
136 (aref binhex-crc-table
148 (if (= crc (binhex-string-big-endian (buffer-substring last end)))
152 (defun binhex-string-big-endian (string)
153 (let ((ret 0) (i 0) (len (length string)))
155 (setq ret (+ (lsh ret 8) (binhex-char-int (aref string i)))
159 (defun binhex-string-little-endian (string)
160 (let ((ret 0) (i 0) (shift 0) (len (length string)))
162 (setq ret (+ ret (lsh (binhex-char-int (aref string i)) shift))
180 (binhex-string-big-endian
182 (binhex-string-big-endian
184 (binhex-string-big-endian