;ELC ;;; Compiled by nelson@oikos.local on Sat Jul 23 20:32:08 2005 ;;; from file /Users/nelson/Desktop/nxml-mode-20041004/nxml-glyph.el ;;; in Emacs version 22.0.50.6 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`nxml-glyph.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\301B\302\303!\210\304B\305\306!\207" [current-load-list nxml-ascii-glyph-set (lambda (#1=#:defconst-tmp-var) (defconst nxml-ascii-glyph-set #1#)) [(32 . 126)] nxml-latin1-glyph-set (lambda (#2=#:defconst-tmp-var) (defconst nxml-latin1-glyph-set #2#)) [(32 . 126) (160 . 255)]] 2) #@123 Glyph set for TARGET1 glyph repertoire of misc-fixed-* font. This repertoire is supported for the bold and oblique fonts. (defconst nxml-misc-fixed-1-glyph-set [(32 . 126) (160 . 255) (256 . 383) 399 402 (536 . 539) 601 (710 . 711) (728 . 733) (884 . 885) 890 894 (900 . 906) 908 (910 . 929) (931 . 974) (1025 . 1036) (1038 . 1103) (1105 . 1116) (1118 . 1119) (1168 . 1169) (1488 . 1514) (7682 . 7683) (7690 . 7691) (7710 . 7711) (7744 . 7745) (7766 . 7767) (7776 . 7777) (7786 . 7787) (7808 . 7813) (7922 . 7923) (8208 . 8226) 8230 8240 (8249 . 8250) 8364 8470 8482 8486 (8539 . 8542) (8592 . 8595) 8800 (8804 . 8805) (9146 . 9149) (9225 . 9229) 9252 9472 9474 9484 9488 9492 9496 9500 9508 9516 9524 9532 9618 9670 9834 65533] (#$ . 892)) #@193 Glyph set for TARGET2 glyph repertoire of the misc-fixed-* fonts. This repertoire is supported for the following fonts: 5x7.bdf 5x8.bdf 6x9.bdf 6x10.bdf 6x12.bdf 7x13.bdf 7x14.bdf clR6x12.bdf (defconst nxml-misc-fixed-2-glyph-set [(32 . 126) (160 . 255) (256 . 383) 399 402 (506 . 511) (536 . 539) 601 (710 . 711) 713 (728 . 733) (768 . 785) (884 . 885) 890 894 (900 . 906) 908 (910 . 929) (931 . 974) 977 (981 . 982) 1009 (1025 . 1036) (1038 . 1103) (1105 . 1116) (1118 . 1119) (1168 . 1169) (1488 . 1514) (7682 . 7683) (7690 . 7691) (7710 . 7711) (7744 . 7745) (7766 . 7767) (7776 . 7777) (7786 . 7787) (7808 . 7813) (7922 . 7923) (8208 . 8226) 8230 8240 (8242 . 8244) (8249 . 8250) 8252 8254 8260 (8304 . 8305) (8308 . 8334) (8355 . 8356) 8359 8364 (8400 . 8407) 8450 8453 8467 (8469 . 8470) 8474 8477 8482 8484 8486 8494 (8539 . 8542) (8592 . 8597) (8612 . 8616) (8656 . 8661) (8704 . 8713) (8715 . 8716) 8719 (8721 . 8723) 8725 (8728 . 8730) (8733 . 8735) 8737 (8740 . 8747) 8750 8764 8771 8773 (8776 . 8777) 8793 (8799 . 8802) (8804 . 8805) (8810 . 8811) (8834 . 8843) 8853 8855 (8868 . 8871) (8898 . 8899) 8901 8960 8962 (8968 . 8971) 8976 (8992 . 8993) (9001 . 9002) (9146 . 9149) (9225 . 9229) 9252 9472 9474 9484 9488 9492 9496 9500 9508 9516 9524 9532 (9548 . 9587) (9600 . 9633) (9642 . 9644) (9650 . 9651) 9658 9660 9668 9670 (9674 . 9675) 9679 (9688 . 9689) 9702 (9786 . 9788) 9792 9794 9824 9827 (9829 . 9830) (9834 . 9835) (64257 . 64258) 65533] (#$ . 1640)) #@167 Glyph set for TARGET3 glyph repertoire of the misc-fixed-* fonts. This repertoire is supported for the following fonts: 6x13.bdf 8x13.bdf 9x15.bdf 9x18.bdf 10x20.bdf (defconst nxml-misc-fixed-3-glyph-set [(32 . 126) (160 . 255) (256 . 511) (512 . 544) (546 . 563) (592 . 685) (688 . 750) (768 . 847) (864 . 879) (884 . 885) 890 894 (900 . 906) 908 (910 . 929) (931 . 974) (976 . 1014) (1024 . 1158) (1160 . 1230) (1232 . 1269) (1272 . 1273) (1280 . 1295) (1329 . 1366) (1369 . 1375) (1377 . 1415) (1417 . 1418) (1456 . 1465) (1467 . 1476) (1488 . 1514) (1520 . 1524) (4304 . 4344) 4347 (7680 . 7835) (7840 . 7929) (7936 . 7957) (7960 . 7965) (7968 . 8005) (8008 . 8013) (8016 . 8023) 8025 8027 8029 (8031 . 8061) (8064 . 8116) (8118 . 8132) (8134 . 8147) (8150 . 8155) (8157 . 8175) (8178 . 8180) (8182 . 8190) (8192 . 8202) (8208 . 8231) (8239 . 8274) 8279 (8287 . 8291) (8304 . 8305) (8308 . 8334) (8352 . 8369) (8400 . 8426) (8448 . 8506) (8509 . 8523) (8531 . 8579) (8592 . 8703) (8704 . 8959) (8960 . 9166) (9216 . 9254) (9280 . 9290) (9472 . 9727) (9728 . 9747) (9750 . 9751) (9753 . 9853) (9856 . 9865) (10214 . 10219) (10229 . 10239) (10752 . 10758) 10781 10815 12351 (64256 . 64262) (64275 . 64279) (64285 . 64310) (64312 . 64316) 64318 (64320 . 64321) (64323 . 64324) (64326 . 64335) (65056 . 65059) (65377 . 65439) 65533] (#$ . 3122)) #@50 Glyph set corresponding to Windows Glyph List 4. (defconst nxml-wgl4-glyph-set [(32 . 126) (160 . 383) 402 (506 . 511) (710 . 711) 713 (728 . 731) 733 (900 . 906) 908 (910 . 929) (931 . 974) (1025 . 1036) (1038 . 1103) (1105 . 1116) (1118 . 1119) (1168 . 1169) (7808 . 7813) (7922 . 7923) (8211 . 8213) (8215 . 8222) (8224 . 8226) 8230 8240 (8242 . 8243) (8249 . 8250) 8252 8254 8260 8319 (8355 . 8356) 8359 8364 8453 8467 8470 8482 8486 8494 (8539 . 8542) (8592 . 8597) 8616 8706 8710 8719 (8721 . 8722) 8725 (8729 . 8730) (8734 . 8735) 8745 8747 8776 (8800 . 8801) (8804 . 8805) 8962 8976 (8992 . 8993) 9472 9474 9484 9488 9492 9496 9500 9508 9516 9524 9532 (9552 . 9580) 9600 9604 9608 9612 (9616 . 9619) (9632 . 9633) (9642 . 9644) 9650 9658 9660 9668 (9674 . 9675) 9679 (9688 . 9689) 9702 (9786 . 9788) 9792 9794 9824 9827 (9829 . 9830) (9834 . 9835) (64257 . 64258)] (#$ . 4474)) #@521 *Hook for determining the set of glyphs in a face. The hook will receive a single argument FACE. If it can determine the set of glyphs representable by FACE, it must set the variable `nxml-glyph-set' and return non-nil. Otherwise, it must return nil. The hook will be run until success. The constants `nxml-ascii-glyph-set', `nxml-latin1-glyph-set', `nxml-misc-fixed-1-glyph-set', `nxml-misc-fixed-2-glyph-set', `nxml-misc-fixed-3-glyph-set' and `nxml-wgl4-glyph-set' are predefined for use by `nxml-glyph-set-hook'. (defvar nxml-glyph-set-hook nil (#$ . -5367)) #@437 Used by `nxml-glyph-set-hook' to return set of glyphs in a FACE. This should dynamically bound by any function that runs `nxml-glyph-set-hook'. The value must be either nil representing an empty set or a vector. Each member of the vector is either a single integer or a cons (FIRST . LAST) representing the range of integers from FIRST to LAST. An integer represents a glyph with that Unicode code-point. The vector must be ordered. (defvar nxml-glyph-set nil (#$ . 5940)) (defalias 'nxml-x-set-glyph-set #[(face) "\304\305\"\306\232\203 \202\n\211\207" [face nxml-misc-fixed-3-glyph-set nxml-wgl4-glyph-set nxml-glyph-set face-attribute :family "misc-fixed"] 3]) (defalias 'nxml-w32-set-glyph-set #[(face) "\211\207" [nxml-wgl4-glyph-set nxml-glyph-set] 2]) (defalias 'nxml-window-system-set-glyph-set #[(face) "\211\207" [nxml-latin1-glyph-set nxml-glyph-set] 2]) (defalias 'nxml-terminal-set-glyph-set #[(face) "\211\207" [nxml-ascii-glyph-set nxml-glyph-set] 2]) (byte-code "\301\302\303\236A\206\n\304\305#\207" [window-system add-hook nxml-glyph-set-hook ((x . nxml-x-set-glyph-set) (w32 . nxml-w32-set-glyph-set) (nil . nxml-terminal-set-glyph-set)) nxml-window-system-set-glyph-set t] 4) #@186 Return a string that can display a glyph for Unicode code-point N. FACE gives the face that will be used for displaying the string. Return nil if the face cannot display a glyph for N. (defalias 'nxml-glyph-display-string #[(n face) "\304\305\306 \"\210\205\307\n\"\205\310\311\n\"\211\205\312 !))\207" [nxml-glyph-set face n ch nil run-hook-with-args-until-success nxml-glyph-set-hook nxml-glyph-set-contains-p decode-char ucs string] 4 (#$ . 7160)]) (defalias 'nxml-glyph-set-contains-p #[(n v) "\306G\307\211\211\211\211\n \n V\203q \n Z\310\245\\\fH\211:\2036 @ A\202:  \n\fX\203Q\f X\203Q\311\n \202\f\nW\203_\f\211\n\202 \f=\203k\n\202l\f \202 .\207" [v mid-end-val mid-start-val mid-val mid found 0 nil 2 t end start n] 8]) (provide 'nxml-glyph)