Current File : //proc/self/root/kunden/proc/self/root/usr/share/emacs/27.2/lisp/hex-util.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@57 Decode hexadecimal STRING to octet string.

(fn STRING)
(defalias 'decode-hex-string #[257 "\211G\300
\301\245\302\"\302\211\211W\203\254H\303
X\203*\211\304X\203*\211\303Z\305\\\202T\306
X\203>\211\307X\203>\211\306Z\305\\\202T\310
X\203P\211\311X\203P\211\310Z\202T\312\313\"\262
\314_TH\303
X\203q\211\304X\203q\211\303Z\305\\\202\233\306
X\203\205\211\307X\203\205\211\306Z\305\\\202\233\310
X\203\227\211\311X\203\227\211\310Z\202\233\312\313\"\262
\\I\210
T\262\301
\\\262
\202\n\207" [make-string 2 0 97 102 10 65 70 48 57 error "Invalid hexadecimal digit `%c'" 16] 12 (#$ . 408)])
#@57 Encode octet STRING to hexadecimal string.

(fn STRING)
(defalias 'encode-hex-string #[257 "\211G\300
\301_\302\"\302\211\211W\2037\303H\304\245HI\210
T\262\303H\304\246HI\210
T\262\211T\262
\202\n\207" [make-string 2 0 "0123456789abcdef" 16] 10 (#$ . 1036)])
(provide 'hex-util)