;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Tue Jun  7 14:46:12 1994
;;; from file /gd/gnu/emacs/19.0/lisp/disp-table.el
;;; emacs version 19.25.1.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "`/gd/gnu/emacs/19.0/lisp/disp-table.el' was compiled for Emacs 19"))

(defalias 'describe-display-table #[(dt) "АђБВ!€Г\fЕH!€БЖ!€Г\fЗH!€БИ!€Г\fЙH!€БК!€Г\fЛH!€БМ!€Г\fНH!€БО!€Љq€РЕС\"ТЕWѓ` \fHI€T‰‚H Х!€+Ц ‘‡" ["*Help*" princ "\nTruncation glyph: " prin1 dt 256 "\nWrap glyph: " 257 "\nEscape glyph: " 258 "\nCtrl glyph: " 259 "\nSelective display glyph sequence: " 260 "\nCharacter display glyph sequences:\n" standard-output make-vector nil 0 i vector describe-vector print-help-return-message] 6 "\
Describe the display table DT in a help buffer."])
(defalias 'describe-current-display-table #[nil "АБ !†\f \n†\f ‰ѓ Е\f!‚ ЖЗ!)‡" [window-display-table selected-window buffer-display-table standard-display-table disptab describe-display-table message "No display table"] 3 "\
Describe the display table in use in the selected window and buffer." nil])
(defalias 'make-display-table #[nil "АБВ\"‡" [make-vector 261 nil] 3 "\
Return a new, empty display table."])
(defalias 'standard-display-8bit #[(l h) "	X…5 ВYѓ ГWѓ \fѓ. \fЕI€‚. \f„' ЖЗЕ\"\fИ!I€T‰‚ ‡" [l h 32 127 standard-display-table nil make-vector 261 vector] 5 "\
Display characters in the range L to H literally."])
(defalias 'standard-display-default #[(l h) "	X…3 ВYѓ ГWѓ \fѓ, \fЕI€‚, \f„' ЖЗЕ\"\fЕI€T‰‚ ‡" [l h 32 127 standard-display-table nil make-vector 261] 4 "\
Display characters in the range L to H using the default notation."])
(defalias 'standard-display-ascii #[(c s) "ѓ БВ!€„ ДЕЖ\"ИЙКЖ\"\"I‡" [window-system error "Cannot use string glyphs in a windowing system" standard-display-table make-vector 261 nil c apply vector append s] 7 "\
Display character C using string S.
S is usually a terminal-dependent escape sequence.
This function is meaningless for an X frame."])
(defalias 'standard-display-g1 #[(c sc) "ѓ БВ!€„ ДЕЖ\"ИЙКЛ\f!НQ!!I‡" [window-system error "Cannot use string glyphs in a windowing system" standard-display-table make-vector 261 nil c vector create-glyph "" char-to-string sc ""] 7 "\
Display character C as character SC in the g1 character set.
This function assumes that your terminal uses the SO/SI characters;
it is meaningless for an X frame."])
(defalias 'standard-display-graphic #[(c gc) "ѓ БВ!€„ ДЕЖ\"ИЙКЛ\f!НQ!!I‡" [window-system error "Cannot use string glyphs in a windowing system" standard-display-table make-vector 261 nil c vector create-glyph "(0" char-to-string gc "(B"] 7 "\
Display character C as character GC in graphics character set.
This function assumes VT100-compatible escapes; it is meaningless for an
X frame."])
(defalias 'standard-display-underline #[(c uc) "ѓ БВ!€„ ДЕЖ\"Иѓ/ Й\nЛМН!П!РH)С\"\"‚8 ТУФ\n!ХQ!!I‡" [window-system require faces standard-display-table make-vector 261 nil c vector logior uc lsh internal-find-face underline face internal-get-face 2 8 create-glyph "[4m" char-to-string "[m"] 8 "\
Display character C as character UC plus underlining."])
(defalias (quote create-glyph) #[(string) "GБUѓ ВГ!€GДUѓ ЕЖЗИ\"\"Е	C\"‰GS‡" [glyph-table 65536 error "No free glyph codes remain" 32 vconcat make-vector 224 nil string] 6])
(defalias 'standard-display-european #[(arg) "А	!ВX„! 	„& Г\f!ѓ& \fGЕYѓ& \fЖHЗљѓ& ИЖЙ\"‡КЖЙ\"‡" [prefix-numeric-value arg 0 vectorp standard-display-table 161 160 [160] standard-display-default 255 standard-display-8bit] 3 "\
Toggle display of European characters encoded with ISO 8859.
When enabled, characters in the range of 160 to 255 display not
as octal escapes, but as accented characters.
With prefix argument, enable European character display iff arg is positive." "P"])
(provide (quote disp-table))