1#@!#!123s

��JFIF�� 1#@!#!123s
: / proc / self / root / usr / share / emacs / 24.3 / lisp /
Filename : hex-util.elc
back
;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:20 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/hex-util.el
;;; in Emacs version 24.3.1
;;; 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.

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


#@44 Decode hexadecimal STRING to octet string.
(defalias 'decode-hex-string #[(string) "G\306	\307\245\310\"\310\211\310	W\203\255�\n\fH\311
X\203.�
\312X\203.�
\311Z\313\\\202X�\314
X\203B�
\315X\203B�
\314Z\313\\\202X�\316
X\203T�
\317X\203T�
\316Z\202X�\320\321
\")\322_\fTH\311
X\203t�
\312X\203t�
\311Z\313\\\202\236�\314
X\203\210�
\315X\203\210�
\314Z\313\\\202\236�\316
X\203\232�
\317X\203\232�
\316Z\202\236�\320\321
\")\\I\210T\307\f\\\211\202�\n,\207" [string len dst idx pos chr make-string 2 0 97 102 10 65 70 48 57 error "Invalid hexadecimal digit `%c'" 16] 7 (#$ . 551)])
#@44 Encode octet STRING to hexadecimal string.
(defalias 'encode-hex-string #[(string) "G\305	\306_\307\"\307\211\307	W\2037�\n\310\fH\311\245HI\210T\n\310\fH\311\246HI\210T\fT\211\202�\n,\207" [string len dst idx pos make-string 2 0 "0123456789abcdef" 16] 6 (#$ . 1155)])
(provide 'hex-util)