;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Tue May  2 20:16:11 1995
;;; from file /gd/gnu/emacs/19.0/lisp/case-table.el
;;; emacs version 19.28.90.69.
;;; 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/case-table.el' was compiled for Emacs 19"))


#@48 Describe the case table of the current buffer.
(defalias 'describe-buffer-case-table #[nil "АБВ\"Г\fБWѓ9 \f‰‰—U„ ЖЗ\f—!P‚0 \f‰–U„/ ИЗ\f–!P‚0 ЙI€\fT‰‚ ЉКђq€М!€Н ‘+‡" [make-vector 256 nil 0 ch vector "uppercase, matches " char-to-string "lowercase, matches " "case-invariant" "*Help*" standard-output describe-vector help-mode] 6 (#$ . 489) nil])
#@274 Make characters L and R a matching pair of non-case-converting delimiters.
This sets the entries for L and R in TABLE, which is a string
that will be used as the downcase part of a case table.
It also modifies `standard-syntax-table' to
indicate left and right delimiters.
(defalias 'set-case-syntax-delims #[(l r table) "	‰I€\n‰I€Г	ДЕ\n!ЖQЗ #€Г\nИЕ	!ЖQЗ #‡" [table l r modify-syntax-entry "(" char-to-string "  " standard-syntax-table ")"] 5 (#$ . 850)])
#@286 Make characters UC and LC a pair of inter-case-converting letters.
This sets the entries for characters UC and LC in TABLE, which is a string
that will be used as the downcase part of a case table.
It also modifies `standard-syntax-table' to give them the syntax of
word constituents.
(defalias 'set-case-syntax-pair #[(uc lc table) "	\nI€\n‰I€Г\nДЕ #€Г	ДЕ #‡" [table uc lc modify-syntax-entry "w   " standard-syntax-table] 4 (#$ . 1315)])
#@257 Make characters C case-invariant with syntax SYNTAX.
This sets the entries for character C in TABLE, which is a string
that will be used as the downcase part of a case table.
It also modifies `standard-syntax-table'.
SYNTAX should be " ", "w", "." or "_".
(defalias 'set-case-syntax #[(c syntax table) "	‰I€В	Д #‡" [table c modify-syntax-entry syntax standard-syntax-table] 4 (#$ . 1764)])
(provide (quote case-table))