| Current File : //usr/share/emacs/24.3/lisp/language/hebrew.elc |
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:12:50 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/language/hebrew.el
;;; in Emacs version 24.3
;;; with all optimizations.
;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
(< (aref emacs-version (1- (length emacs-version))) ?A)
(string-lessp emacs-version "23")
(error "`%s' was compiled for Emacs 23 or later" #$))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301\302\303\304\305\306\307\310\311\312&\n\210\313\312\301\"\210\313\314\301\"\210\313\315\301\"\210\316\317\320\"\210\316\321\322\"\210\300\323\324\303\304\305\325\307\326\311\323&\n\210\313\327\323\"\210\300\330\331\303\304\305\332\307\333\311\330&\n\210\313\334\330\"\207" [define-coding-system hebrew-iso-8bit "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)." :coding-type charset :mnemonic 56 :charset-list (iso-8859-8) :mime-charset iso-8859-8 define-coding-system-alias iso-8859-8-e iso-8859-8-i set-language-info-alist "Hebrew" ((tutorial . "TUTORIAL.he") (charset iso-8859-8) (coding-priority hebrew-iso-8bit) (coding-system hebrew-iso-8bit windows-1255 cp862) (nonascii-translation . iso-8859-8) (input-method . "hebrew") (unibyte-display . hebrew-iso-8bit) (sample-text . "Hebrew שלום") (documentation . "Bidirectional editing is supported.")) "Windows-1255" ((coding-priority windows-1255) (coding-system windows-1255) (documentation . "Support for Windows-1255 encoding, e.g. for Yiddish.\nBidirectional editing is supported.")) windows-1255 "windows-1255 (Hebrew) encoding (MIME: WINDOWS-1255)" 104 (windows-1255) cp1255 cp862 "DOS codepage 862 (Hebrew)" 68 (cp862) ibm862] 11)
(defalias 'hebrew-font-get-precomposed #[(font-object) "\306\307\"\310\311\211\204C \312C\313\314\nG\n$ \nG\314
W\203< \f
H\2035 \315
H\f
H #\210
T\211\202 +\316\307 #\210 +\207" [font-object decomposed chars precomposed gvec i font-get hebrew-precomposed [64298 64299 64300 64301 64302 64303 64304 64305 64306 64307 64308 64309 64310 64312 64313 64314 64315 64316 64318 64320 64321 64323 64324 64326 64327 64328 64329 64330 64331 64332 64333 64334] [[1513 1473] [1513 1474] [1513 1468 1473] [1513 1468 1474] [1488 1463] [1488 1464] [1488 1468] [1489 1468] [1490 1468] [1491 1468] [1492 1468] [1493 1468] [1494 1468] [1496 1468] [1497 1468] [1498 1468] [1499 1468] [1500 1468] [1502 1468] [1504 1468] [1505 1468] [1507 1468] [1508 1468] [1510 1468] [1511 1468] [1512 1468] [1513 1468] [1514 1468] [1493 1465] [1489 1471] [1499 1471] [1508 1471]] t font-get-glyphs 0 set-nested-alist font-put --dotimes-limit--] 6])
(defalias 'hebrew-shape-gstring #[(gstring) "\211\211\306H)\306H)\307 \310\"\211\211\306H)GS)\311\211 \311\211 \311\211 \311 \312U\203\307 \306 \211 \313\\H*\211\211 \314H)\311 \211 \315H)\211 \306W\203\213 \306 Z ! \"\211 \316\317\"\206{ \306!\206\201 \306 \206\207 \306#I,\210\211 \320H)\211 V\203\303 \306\211 ! \"\211 \316\317\"\206\263 \306!\206\271 \306 \206\277 \306#I,\210*\202/\321\n@\236\204\325 \321\nA\236\203\334 \322!\210\202/\323 !\211\306H)\324\f\311\312$\211:\203F\325@!\203F\326@!\211 \306 S # $\211 \306$I\210\312#I+\210\306 \211 \313\\I+\210\312\311 \211 \313\\I+\210)\202/\250\203!\313V\203!\324\f\312$\211\203!:\203!\325@!\203!S\211 %S &\326@!\211\306 S # $\211 \306$I\210\312#I+\210\306 \211 \313\\I+\210%\211 W\203\373 \211 \313\\H*\211\306 S # $\211 \306$I\210\312#I+\210 &Z \211 \313\\I+\210 T\211 \202\257 &Z\311 \211 \313\\I+\210%&Z &Z*\202L\306 \211 \313\\H*\211\306 S # $\211 \306$I\210\312#I+\210\312 \306 \211 \313\\H*\211 \314H)
W\203/ \211 \313\\H*\211\306 S # $\211 \306$I\210\312#I+\210\211 \315H)\211 \314H)Y\203\315[\306\211 ! \"\211 \316\317\"\206\272\306!\206\300\306 \206\306\306#I,\210\202&\211 \315H)\306Y\203&\211 \320H)\211 \315H)Z \327 Z\313\245\211 \315H)#\306\211 ! \"\211 \316\317\"\206\306!\206\306 \206!\306#I,\210) T\211 \202b.\n\207" [gstring font otf nchars header nglyphs 0 font-get :otf nil 1 2 4 5 9 vector 6 hebr font-shape-gstring hebrew-font-get-precomposed lookup-nested-alist vectorp copy-sequence - base-width glyph precomposed val idx i bearing width wadjust yoff xoff to from ncmp diff] 7])
(byte-code "\305\306 P\307 Q\310\f\311\312 \313\314#\312 \315\314#\312\n\316\314#\317F#\210\310\f\320\321#\210\310\f\322\321#\210\310\f\323\321#\210\310\f\324\321#\210,\325\326!\207" [base combining pattern1 pattern2 composition-function-table "[א-ײ]" "[֑-ֽֿׁ-ׂׄ-ׇׅ]+" "" set-char-table-range (1425 . 1479) vector 3 hebrew-shape-gstring 2 1 [nil 0 hebrew-shape-gstring] 1470 nil 1472 1475 1478 provide hebrew] 9)